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This booklet contains four, articles for us4 by 
the* APL computer programming language. In the first 
a Liberal Arts College,? Donald Mclntyre describes 
the implementation of an introductory computing course 
College and the presentation of a faculty seminar in 
computing. Principles used in APL instruction ar4 discussed, and 
specific instructional examples and a 13-item bibliography are * 
included. .Then, Gillian Wade , in "Teaching APL U an Academic 
Environment" describes the status, organization, and history of APL 
courses at the University of Guelph, Ontario, and presents examples 
fit applications by students. "APL in the Classroom" by Ted Edwards" 
outlines classroom applications for courses in which APL has been 
taught as a subject or used as a language of discourse to teach 
another topic. Examples of lesson material, reasons for APL 'success, 
limitations, and possible extensions are presented. Finally, Kenneth 
Iverson, in "The Inductive 'Method of Introducing APL," treats some of 
the lessons to be drawn from analogies with the teaching of natural 
language, examines details of their application in the development 
a 3-day introductory -APL course, and reports results. Implications 
for -more advanced courses are also briefly discussed. (LMM) 
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■APL IN A LIBERAL ARTS COLLEGE 

/ - ' ' . . .• 

t 

Donald' B. Mclntyre 
*. « ' . Geology Department 

Pomona College, • 
' Claremont, California 



. Introduction 

Iverson notation was 9 introduced at Pomona College in 1964 when the u Formal 
Desefiption of Syst£m/360" was published in the IBM "Systems Journal", Vol. 3, 
#2-3. . Pomona, a liberal arts undergraduate college with 1300 students, ordered a 
360/4)3 on April 7, J964, and one of the first System 360's shipped by IBM was 
delivered in September J 965. It had only 16K memory, and it had no console 
, typewriter. The modern concept of a -"System" was not recognized; all programming 
was in Basic Assembler (which required the card deck to.be passed twice through the 
reader/punch), and 'the supposedly privileged instructions (such as LPSW) were freely 
available to any programmer. 

The long-term advantage to me of so primitive and small a system was that it prepared 
me for the "Formal Description". If I had had a fully operational system, I would 
doubtless never have seen the IBM "Systems Journal", and would have remained in 
ignorance of Iverson's work. It was ajso fortunate that Chapter 2" of Iverson 's."A 
Programming Language" used the IBM 7090 a$ the example of microcoding, because 
I was familiar with that.jnachine through access to Western Data Processing Center 
on the LJ.C.L.A. campus. When I discovered the "Formal Description", and through 
it Iverson's book, I became greatly interested *fn the fact that a language had been 
developed- that permitted the description of so complex a machine as a 360 computer. 
The intellectual potential of such a tool struck me as enormous and completely in the 
tradition- of the historical development of mathematics. Quite apart from its obviouf 
practical value, I was persuaded of its vital importance to the subject matter that si 
1 the core of liberal arts studies. » 

Although I had 'taught informal classes in Assembler and FORTRAN, I taught die 
first class for credit in computer science at Pomona in the academic year 1968-69. A 
feature of the class was a study of the comparative anatomy of computers, with special 
emphasis on tlje architecture of System/340 and its relationship to, the structure of the ' 
IBM machines that preceded it. Iverson notation was used in*he class, and students 
were encouraged to write formal descriptions of machines that they designed themselves. 
While I was teaching this class, I discovered to my delight that Iverson notation had 
been implemented as the language called APL. 

Because no terminals were attached to our 360, we had to be content to use APL as 
a- tool of thought, ancf this turned out to be very much to my advantage in appreciating • 
its value. However, through the courtesy of our local IBM representatives, I was able 
to make $ome use of APL at the Thomas J 4 Watson Research Center^ Yorktown 



♦ Heights, by means of terminals in" IBM's Riverside office, California. On weekends 
^ and at night, SbYfle of my students were aj>le to recast their Iverson notation into APL 
. # that they could execute on the cojgpiirffat Yorktown Heights. The success of the class 

Ted me to attend the APL LUers Conference ("The March on Armonk") at S.U.N.Y. 

Bingharaton in July 1969, and I was fortunate also in being able to visit thfe APL group 

#x Yorktow'n Heights. * J 

From that time I worked to achieve an APL sy^em for Pomona College, but this was 
not easy to.accomplish. AIth(>ugli the configuration of pur 360 grew, the administrative 
work on it also increased. It was never possible to attach terminals/'and for many years 
we had access to APL only through the kindness of friends, until the College was able 
to lease a small fiumber of ports on a DEC-10 owned by the other colleges in the 
Claremtfnt cluster. During these years I did not teach the "Introduction to Computing" 
*gain, but on one occasion th*pCo!Iege was fortunate in having Dr. W.J.'Bergquist, 
of IBM, teaifch the course. In the meantime^ I continued to use APL in my own work,^ 
and notably, in my class in' elementary crystallography, which is taken by all students 
•wh<fc major irr geology. 

• r 

I was, privileged also to spend the summer of f 97 1 , at tne invitation of Dr. Iverson, 
with the L group? which was then under the management of Adin Falkoff at the 
IERvI Scientific Center in Philadelphia. \ / * * 

In 1975, the Geology Department acquired thesecond 5100 desk-top computer shipped 
to a*customer\ by IBM* Ecfuippecf with 4 video-monitors, the 5100 let* me u$e APL. 
in the classroom. Enormous progress. resulted from the fact that students £obld get free 
use of APL 24 hours a day, and several developed into highly skilled usees. Moreover 
■ other departments began t6 use the 5100 in theology, and this machine ^es followed 
by a second 5100, in the Physics * Department, and later by 51 10's in Botany and 
Mathematics*. All' of these were used almost entirely as AP^ machines. ^ 

In 1977-78, through ,a grant from the Mellon Found#ioh for Faculty Development, 
.and with the cooper&tidi^of the IBM Corporation, the College was able to have Dr. 
Dofii L '^Orth teach courses bothJW faculty and students. This did mucti to lay the 
4 . foundation at Pomona for a major advance in the 1 appreciation of APL as an extremely 



important tool of tjpotlght. \ / 

* ' 4 A 



On January 30, 1979, Pomona College ordered an, IBM* 4341, and an IBM 4331 was 
installed as an interim processor in May, 1979. This"was the. second 4300 System 
' shipped to a qustonler. By^his time it was generally* understood on the campus that 
a good implementation of APL was essential, ayd this played a major role in our 
A^iecision to purchase IBM equipment. During the. first semester of 1979-80 we had 
\ limited access to VS APL under CMS through IBM 32^7 terminals, which have since 
^een replaced b^ 3278^; The Introductory, Chemistry class,, with about 150 students 
^vhich is a very large number for any class in Claremont), and sorhe^majler classes 
in other departments, immediately began using APL on the 433L During tnfe second 
semester the APL Extended Editor was installed and 30, terminals were available to 
users. The^humber of active users rose to abbut 560. In addition to servicing the 
Academic usefs, the 4331 continues to do most of the administrative computing for all 
the Claremont colleges formerly -d<jne by the 360/40. The administrative work is run 
as a virtual machine under the unsupported DOS-26 operating system, and there are, 
<^f course, times when* the machine is overloaded. 

< 

Pomona College is a small liberal arts college with an exceptionally diverse curriculum, 
• intluding Astronomy, Botany, and Geology. There are, however, no departments of 



^engineering or computer science. Students Who wish to' do so are able to enroll *fn 
courses at our close neighbor, Har.vey Mudd College, an undergraduate college strong 
in science and engineering. Harvey .Mudd offers courses, in computer science, bur these 
have emphasized structured programming, notably ALGOL and PASC%T, in 'contrast^ 
to APL. - -Sf 

V 

Because I had successfully demonstrated to colleagues in disciplines ranging from 
Economics to Chcniistry that many practical problems can be solved remarkably easily 
be means of APL. Iwas asked to teach an "Introduction to Computing" in -the' second 
semester of l'979-'80. The enrollment was about 140. making it' one of the largest classes 
on the campus. Twenty-five different majors^were represented by the students enrolled^ 
and faculty members from such diverse areas as- Biologv. Geologv. Art, French, and* 
Physical Education audited the class. The impact of this class was sufficient to d<4and 
a two-week summer class in APL for faculty members, and it is probably safe to say , 
.that A PL, using Direct Definition, is recognized as the principal langUage'Uor' 
computing at Pomona College. ' 

The original System 360 40 was given to Pomona bv Mr Frank Rog2 Seaver o(\os s 
Angeles, and the further generosity of the Foundation he created made 'it possible Tor ■ 
the College to purchase the 5100 computers, the 4331 (soon to be -replaced by the 434 1>,' ■ 
and all the peripheral equipment Without this support, it would, of course. Have been 
impossible for Pomona to provide the equipment needed for quality instruction. \ 

"Introduction to. Computing": A .Semester Course * 

I offered the course in 1979-80 to all interested students, without pre-requisites of any'' 
kind. The number of senior students who enrolled would have made" a class of 
substantial size at Pomona, but had the class, been restricted to seniors; no progress 
would have been made towards alleviating the problem injure yeaFS. Now that«all» 
students- have had an opportunity to take the class, I intend to restrict enrollment and 
give preference to freshmen and sophomores. 

* • ' » 

Including auditors, nearly 160 people took the class, and the size retired our meeting 
in a large lecture room in which it was impossible to use video-monitor^ Had the room 
been smaller I would have used monitors Attached- to a ,5100, tejause we lack the 
•equipment needed to display the screen of a 3278 terminal^ grdVp. ,The, class* met 
for two 80 minute periods e t 7ch week. In addition to teaching this class, ht aught. classes 
in geology and performed administrative duties for the Geology Department and the 
Computer Center as best I could. 

r 

The concept of IBM 3278 terminals is to pr'ovide clusters that share a printer, and 
the largest of our clusters resists of'U terminals in, * rather, smart room in the 
Mathematics Department. I cobW not schedule the use oT this room,, and my students k> 
had to compete with others for tfte use of the terminals. I had 'the help 'of only <Jne ■ 
assistant, Jeff Siegel, who was a senior premedical student an<i greatly interested ir/7 
the power and proper use of APL. At night he monitored the cluster of II terminal^ 
giving help to any students who needed it, while I travelled round fhe other clusters; \ 
like a doctor making the rounds of the wards. In the future I hope to be/ble to schedule 
the students' time on the terminals, in the way that laboratory vvcpk is scheduled in 
the Chemistry Department, I would then restrict enrollment based on the number of 
laboratory sessions that can be staffed and the number of terminals 'available. Students 
who have already taken the course should be able to act as assistants in the future. 



Because there were some people on campus who were not persuaded of the utility of 
APL, I considered the course to be, as its title indicated, an Introduction to Computing 
in'general, and not merely an introduction to APL. My object was to give the students 
an understanding of the principles of computers and computer languages, dnd their 
historical development, so that every olie could judge independently about the proper 
role and- usefulness of APL. It would, of course, have been impossible for me to conceal 
my own judgement on this, and I did not pretend to do so. 

Retause we were using* VM, every student, had his own "Virtual Mathine','. T^e 
Conversational Monitor System (CMS) permits each Virtual machine to have a 
^Profile" that is executed whenever the user logs on, and it would have been' possible 
v to have given each stentent a Progle that would have automatically invoked the APL 
system, but I chose jjot to do so. This meant "that the students became familiar with 
the management of their resources under CP (Control Prograip) And CMS. For 
example they learned how to define and attach additional (temporary) 'disks; how to 
link to virtual disks of other users; how,^ write CMS EXECs (including their own 
Profiles), how to use IBM's full-screen editor (EDGAR); how to rename, copy, pa|:k, 
and erase CMS file's, and how to send CMS files to other users or to the line printer. 
It is ea*)' to teach this kind of information when the student has a terminal in front 
of him, but I had to teach by remote control, and to do ,this v I wrote a manual with 
the following sections: 

1. CP CMS and APL. Three levels of operation 

. V * , 

2. Interrupting your Virtual Machine 

3. QUERY for information about your Virtual Machine m f y 

4. Copying C^IS, Files from disks on other Virtual Machines ♦ 

5. y Full-screen Editing and IBM's EDGAR editor 

6. FLIST and the management of 'your resources under CJv^ 

'a 

7. APL System Commands f > 

8. IPF: IBM's full-screen Interactive Productivity Facility 

9. Receiving and sending Mail 

10. BROWSE ' ■ - , 
H. Reading and executing FORTRAN programs 

*12. 'Writing CMS E^XECs 

73. Attaching additional disk drives to your Virtual Machine 

14. Linking iq virtual disks* on other machines * 

* \.- # 

15. Using Program Function keys 
• « 

f * 

16. Files created by the FORTGI compiler 



ts:* t 



\6 



17 FORTRAiV subroutines 

18. Management of APL Workspaces 

19. APL Public Libraries 

20. Direct Definition of APL functions • ' > ' 

f. 1 • ' ) ' ^\ 

21. RelationaL Data -Bases 

m 

\ 

22. QUERY: an APL simulation of IBM's "QUERY-BY-EXAMPLE" ■ , ^ 

* ' ■ ' * \ 

23. Curve fitting (regression) and statistics using APL - 

j s 

24. -Using Arrays in APL: an example from Economics 

25. Logic: APll implementation of the* work of Boole and levons ■ . { 
^ 26. Linear Programming in APL ' . 

27. Introduction to plotting, using Tektronix *6l£ display and IBM's APL Graphpak 

28. Data Bases with multiple-line entries, using APL - , ' 

29. Storage of Floating-Point Numbers in the 4300 r ' 

30. Introduction to Assembler -Language 

31. Introduction to the use of a 'memory dump' \^ 

I asked each student in. the d^ss to attempt a project that would illustrate the 
application of computing to some area of personal interest., I particularly encouraged 
.students to consult faculty members in their major fields, so that the projects would 
be as useful as possible in their academic programs. Several chose applications 'that 
r^ted tp their employment in college activities, such as the Student Union, the 
Admissions Office, thq Development Office^and so on. A few concentrated on games. 
There werC many projects dealing with statistics applied to psychology, government, 
and biology. Mathematics students. develop<S<iJf unci ions for operations research and 4 
linear programming, and some created systems to differentiate and analyze given 
functions (see J.W. -ReFgquist, 1974). An interesting study of combinatorics made good^ 
use of recursive functions. , * J 

Many social scientists are highly dep^ident on a large- black box, called- Statistical 
Package for the Social Sciences '(SPSS),*and several students successfully wrote APL* 
functions that produce results identical to the output- from SPSS. v * 

,The diversity was very great. Two students, impressed with the formal description of 
System/360, did' a good job of- simulating a 6800 microprocessor in APL. Another did 
an analysis of the practical question as to whether she should buy a new car, and if 
so, what kind. One biologist, who was using radio-transmitters on coyotes in the 
mounta ; ns, had the p 100 drive a Tektronix 4662 plotter to show on a contoured map 
the tracks of the .animals by Jay and by night, and determine the statists of their 
movements. Another analyzed tide tables to determine the length of time that the 
animals in the tide pools were below^ sea level. A French major used five-dimensional \ 



arrays *to manipulate French verbs/ And a geplogy stydent used eigenvalues to 
determine the fold axis in deformed; rocks. Models in Economics were popular, and 
methods of text analysis were applied to English proseSand to genetics. 

After seeing a demfnstration of IBM's "Query-by-Example", I simulated QBE in 
APL, largely in Direcf Definition. I'made the workspace available to the students, and 
in class ^discussed how I had approached tfie problem. A large number of students 
took this as a rno^ and created their own systems implementing simple bV^ practical 
examples of relational data bases. An Art major prepared a sysiem to catalog art slides, 
an antKjfcpologist analyzed the distribution of cave art, a Music major simulated the 
R.I.L.M. bibliographic music data base, and an Asian Studies major created a complete 
interactive catalog of- all known translations of Ketfuki plays, which the faculty 
members in that field judge to be an important contribution. 

Even those who did not complete a noteworthy project found the attempt to apply -th^ir 
Computing knowledge to be a valuable experience. - 

* < 

Faculty Seminar in Computing • „ - 

In June 1.980, after the end of the second semesfcr of t the academic year, I taught a 
seminar for. 12 o£jn/ colleagues, whose fields were Chemistry^Economics, Government, 
Mathematics, Philosophy, Sociology, and Zoology. The number of participants was 
limited to the number of terminals we could arrange to have in one room, for the reason 
that I wished £ach person to be at a terminal the entire time of the seminar. We worked 
intensively from §:30 a.m. to #00 p.m. every day for two weeks. This was a very 
interesting experience. It involved total immersion in APL, and in my opinion the 
. length.of the seminar was just right. After 3-5 days most people find that they^are 
becoming lost. Tftfey have learned much, but the pacts are not yet seen as making a 
whole. As tKe second week progresses, it is obvious that comprehension (in the literal 
sense) is taked place rapidly; the mechanics of the operations cease to dominate, and 
attention can be given to topics^of intellectual interest. 

Although the group learned how to use the power of CMS, even learning how to 
manipulate real tapes, there was a clear emphasis on APL. Probably all who 
.participated did so because they had heard of APt and^ wished to learn about it for 
themselves. Because they constantly learned by doing, they covered the more mechanical 
and machine-oriented material quickly, and thi^ gave maximum .time for ihstruction 
on the proper u$e of APL. 

Many of the participants were from the Social Sciences, and I therefore covered two 
topics that I had not been able to include in the semester course; namely, the use of 
Shared Variables to access data in CMS files npt created by APL, for example by 
EDGAR; and the use of IBM's 124X auxiliary processor for creating full-screens 
under the control of APL functions. 

The faculty ^embers wfto'were in the seminar are busy people, and it seemed desirable 
to cover as mueh material as possible in the limited time j knowing that they could got 
the experience of practice later, on their "ovjul. I believed it was important that they 
ended the two weeks jvith the- feeling .that they had accomplished a lot, and that in 
dealing with students an4 colleagues in the future, they would be confident in knowing 
that although they might not remember exactly how to perforrtusome task, they would 
remember that they had actually done it. In this way the fear an3" mystery associated 
with the jargon and the symbols was effectively dispelled. ^ 




Principles Usej^ ih APL Instruction 



V 



^ I always begin by showing that APL is immediately useful, for Example, by using 
* +/1 2 3 4 5 6 to add up a string of numbers. ^After .two or three class meetings, . 
.whenAhe students had had time to see how^easily they could achieve results with APL, 
I wap asked "when will we ;tart ^writing programs ?V or, in other words, "when will 
iHir start'to hurt?" I decided then that it wa§ worth taking time to let the students 
leaoi enough FORTRAN to write simple programs and subroutines. This ensures an 
understanding of th/ fact that there ace % different kinds of programming languages. 
BefQre I had finished /with this exercise, several students asked rfte why we were 
wasting..time on FORTRAN when it was so easy to achieve the same results in APL, 
I explained, that there are thdse who claim that APL is inefficient in comparison to 
a compiledManguage, such as FORTRAN} and I directed them to-cojleagues who hold 
this view. The result was remarkable. The students asked whether the object was to 
save their effort or thj effort of the machine! In view of the obvious decrease v in cost 
in hardware, #nd the simultaneous, increase in the cost of getting* qualified people, thq 
argument about supposed efffciency was not. found to be very convincing. This was even 
more the case after we had discussed the "efficiency" of the FORTRAN program tha> 
we had written to do sorting. An important lesson 'learned was that inefficient programs 
can be written in any' language, and that the efficiency of the interpreter^ compiler 
might be taken into account also< 

As the course continues I try constantly to make what we are doing appear^bviously 
practical. 1 do this by taking examples that I know to be relevant to fields represented 
by members of the class. £ut I also emphasize the evolution of mathematical thought 
and notatioVjhrough time, demonstrating that APL today is a continuation of the « 
tradition represented by sucji. men as Napier, Oughtred, Leibniz, Euler, Boole,-Jevons, 
>De Morgan, «Q#yley, Sylvester, Peano/and many more of the intellectual giants of past 
centuries. For example, we see how Iverson extended De Morgan's Law and why these 
are useful; how compression implements Boole's selection* flection; how the inner 
proBuct of APL enormously extends™ the power of tile matrix multiplication of Cayley; 
and how APL helps^the non-mathematician jo understaniLand use concepts such as 
zero, emptiness, andf recursion. 



ft 



Index Origin , < 

The discovery of zero 'was one df the triumphs of human intellect. But, even today, 
many people, even mathematicians, seem not to have fully accepted zero into their 
thinking. Although my students were, of course, free to work in either origin, every 
expression that I shared with the class was written in Origin Zero. X*.*\N is the 
obvious vyay to generate the powers of X for polynomials and regression, and the first 
(leading) po\*££_js 0. The word "first" is, perhaps, the greatest stumbling block in the 
general acceptance of origin zero, but nearly all students chose to work in origin zero / 
when they realized that graphs are normally drawn so that the axes are labelled 
starting at 0, and when they saw such commonly occurring expressions as:" 



to generate M integers* starting with N 



) 



Am 



where B is logical (Boolean); i.e., O's or l's. 
/This is an expression usefuKor giving pictorial 
output, as in 
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{pM)T(V=t/V y )/\pV+,M 



, f * 1 [9(tr/V)o/^3 2 1 0 2 4 6] 

which gives the-indexerof all occurrences of the 
largest value in the matrix M 



Right-to-Left Execution 

Not a single student as much as Remarked about the right-toHeft order of execution. At the 
outset I simply said that, as in i\A expression log sin square-root X", every function in APL 
'takes as its right argument everything to its right, unless parentheses change the order. I 
pointed out that this was the normal order in mathematics beyond the most elementary level, 
for example in sequence of rotation matrices, and that it leads to expressions that use the 
minimum of parentheses. I stressed, that it is never necessary to en&an expression with a right 
parenthesis, or to use two adjacent right parentheses within any expression. 

The non-commutative functions minus and divide, which may require parentheses if the left 
argument is composite, can often be converted into the related commutative functions plus and 
multiply, with the elimination of parentheses: x 



(A F B)-l 
(A F B)t10 



1 + A F B 
.1 x A F B 



Moreover, this brings out the analogy betw&n the negative sign, and the decimal point as part 

of the name of a number. ^ 

.♦ , 

When these simplifications are ignored, there is ground for questioning whether the concepts 
of negative and fractional numbers have been understood. 

Although expressions can be EXECUTED only from right-to-left, it is good jo adopt the 
practice of READING expressions from left-to-right and well as from rrghuto-left. For this 
reason (as originally pointed out to me by" Larry Breed) no variable should be specified more 
than once in one expression. 

I asked my students jto be conscious of the style of their APL, just as they shoukfbe of their 
English composition. As with English,, it is important to study good examples. The publications 
of the APL Press were pointed out as containing admirable models.^ * 



\ 



Direct Definition 



The word "functioSf* was first used in the modern sense by Leibniz and Bernoulli before 1700. 
They wrote in Latin and simply used the word meaning "perform". A function performs the" 
task of combinirjg its arguments together in some specified (forrrtal) way. If the arguments are 
thought of as nouns, then the function is an imperative verb. 

In 1753, Euler used the notation <J>: (x,t) for a function <J) whose arguments are x and t, and' 
in 1754 he wrote the analogous palatum, f:(a,n) for the function f of a and n. 

K.E. Iverson, the principal inventor of APL, introduced a variant of Euler's notatioh in 1976 
in his book "Elementary Analysis". Like Euler, Iverson began by writing the name of the 
function separated from what followed by a colon. Whereas Euler simply named the arguments 
(separated by commas and enclosed in parentheses), Iverson wrote the APL expression that 
constitutes the formal definition of the function. "A formal definition is one which can be 
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interpreted by a mechanical application of known rules, requiring no^jtfdgeme*nt or subtle 
interpretation" (Iverson, 1976, p. 10). , * 

Following the conventions of elementary mathematics (illustrated in the examples -X y 2+3, 
2-3, 2x3, and. 2*3), IverSon permitted definition of functions with either one or two arguments, 
one on the right and, if necessary, one pn the left of the function name. To distinguish between 
these within the formal definition, he used the symbol a to stand for the left argument (if any), 
and to to stand for the right argument. These are "dummy" arguments or "place-holders", for 
which actual values are substituted when execution takes place. 

Thus, w«r can define the Sanction YF as follows- 

J . 
YF: (u° ,*ipa)+ . xa ■ « 

where a is a vector of length 2 \vh9se elements* are the y-intercept and the slope^of a straight 
line, and where cj js a vector (or scalar) of values of x. 1 ^ 

i* 

Then YF is. the function that gives the values of y corresponding to the values of x denoted 
by to; for* example, . , 

fs 2 YF 1 2 3 \ 5 

gives the values of y corresponding to the values 1 2 3 k 5 for x when the y-intercept is .5 
and the srlope is 2. The colon may be read as "is", thus, F:a*oj may be read as "F IS a raised 
to the power cv". ' 

Iverson extended this notation to permit definition of recursive functions; i.e., functions that 
are defined in terms of themselves (Iverson, 1976, Chapter 10). The recursive definition of a 
factorial requires the following three -pieces of information: 

A primary expression: uxFAC u-1 

A proposition: w =o 
A secondary expression: l 



n a formardefiniwbn, thes> three items are presented in order, with colons separating them; 
hus ( . 1 



I 

thus 



FAC:u>xFACu>-l:u)=0:l 
FAC h 



2h 



You can read the formal definitions as: "The J7k7torical IS cj times the factorial of «-l 
UNLESS o)=0, IN WHICH CASE it is 1". 

A proposition is an expeession that yields either 0 (meaning false) or 1 (meaning true). When 
there are three colons, the proposition is executed first; the primary expression is executed if 
the propogition yields 0, and the secondary expression is executed if the proposition yields' 1. 

person's aoj method of function definition is called "Direct Definition' 1 . In order to implement 
it on a computer, it is necessary to provide a compiler .that can. take the character string giving 
the formal definition and convert it into executable code. LP. SharpVsystem can detect function 
definition from its unique syntax (the -name 4 being followed by colon) and does the conversion' 
in a manner transparent to the user. 4 



Direct Definition enforces a discipline that makes it far easier to write good APL. It is also 
a natural way to teach, because functions are introduced (on the blackboard or on, the terminal) 
as the subject requires them and without digressions. Any expression j^ready developed is 
simply given a name atfd used. Documentation is straightforward, because every distinct concept 
is a one-line function with no side effects, i.e., without pretending to do^one thing but doing 
another. If the functions have been well chosen and well named, it is easy to state w Rat each 
does. Interactive documentation with appropriate data can illuminate the individual functions 
and illustrate typical ways in which the functions interact as a system. 

As Paul Berry has said (Berry, et al.j 1971), "When APL functions are executed at an APL 
system, the user should have to state mathematical kernel of his function, and nothing more". 
Direct Definition permits just that. Nothing Superfluous is required. I believe that the use of 
Direct Definition is .il*o consistent with the exhortation of John Backus, in his Turing , Award 
Lejcture, that the usei should function as much as pc&sible in, the world of expressions rather 
than in the world of control statements. 

Throughout both my semester course and my two-week seminar, I used onlv Direct Definition 
of functions. The only exceptions were when I needed "house-keeping" functions, for example 
to handle shared variables or to provide annotated output. Despite m> example and admonition, 
several students "discovered" that the del (V\, form of function definition permitted them to 
write multi-line programs filled with loops arid branches. Although L had never once spoken 
about branching, students who already knew something abbut languages such as BASIC seemed 
to have a serious disadvantage , in being almost incapable of escaping from the intellectual 
tyranny of "word-at-a-time processing" and the consequent superstructure of control state- 
ments. In an attempt to combat this unfortunate tendency, A played the tape of John Backus' 
Turing Award .Lecture, in which he says that this style of programming has held up progress 
for 20 years. My experience persuades me that the widespread use of BASIC on home- 
computers is a dangerous threat to the intellectual development of many bright people. 

Familiarity with All Primary Functions 

I fry to let mv students share the intellectual pleasure of seeing the surprising and diverse uses 
of such functions as i and T. I want them to feel at home with expressions like OiV (for the 
scalar representation of the last element of the numeric vector V), or Mil (for 1 plus the number 
of Is before the first 0, reading the rows of the logical matrix M from "right to left). On the 
first encounter with such expressions, they may appear awkward and unnecessarily, subtle, but 
this because of unfamiliarity with the primary functions. Like any^other new concept, once 
the strangeness of novelty wears away, these functions can become very natural as well as useful 
intellectual tools. 

As an example of how the decode, or base-value, -function (i) can be introduced and made 
familiar, consider the following: 

It is easy to understand how the vector 1 9 8 4 is reduced to a scalar by the function i usirtg^ 
the base 10 ' 

1011 9 8 4 . * 

1984 ' # 

Nov/ create a function that provides a formal definition of what we have just performed, and 
we see that although we commonly write a sequence of numbers from left to right, we write 
the digits of a single number so that they increase in value from right to left; thus, the vector 



' resulting from Xhi function \ must be rotated before it can beJed to generate the needed 
weights.' ■ r . . 

BASE : cj+ . x<t>pt* i 
< W 9'8 "I - , ' * 

The function* will always 'give a sralar result, arid its left Argument can b'e 0: 
0 SASff . . . 

*' ' / 

\ ' Oil 9 8 h . : p • ' j 

• 4 * - 

. \ . * 

That the result* is a $calar can best be derrtonstrated by- 

pp6i7 . , . . 

. In contrast, tf>e result of take, (t) is always a vector: 
• * 



. l 7 N 

,Now considfcr the treatment of a polynomial such as: 

, . *a + bx + cx 2 nf 4 cfx 3 

In -the fij^frplace we can reVrite this *as: 



V + a iV w*/ 



so that the pattern is more evident by having a uniform and consistent treatment of all terms 
We have made it obvious that there are only two arguments: a, vector of coefficients and a 
scalar X. The first term is brought into conformity witji the pattern of the others, once we ! 
assimilate zero into our thinkinfe. Moreover, we find that many disciplines, such as Economics ' 
already use the subscript 0 for the first term. Thu's origin zero is in fact in common use, though-* 
not always recognizor I encourage my students to be consistent in their use of origin zero. .". 

If we take -the follbwing values for the coefficients and the scalar: 

W.5 2 "3 0.8 ' f 

the polynomial can be written .in APL thus: , 

£[0] + (CtlJxX) + : (Ci2lxX*2) + £[3]xA>3 
t.V375* - 



,This is a direct translation 'of the algebra into APL. We can improve i 
the parentheses* ar|', riot needed: 

CL0l+XxC!£l}+XxCl2l+XxCl3') * % & 
~4?4375 * 

t ■ % \ 

But notice that although the coefficients exist as an array, we refer to them and use them, 
in* both, expressions, as individual scalars. In order to take advantage of the 'fact that C is an 
array, and thai the vector of powers to Which X is raised is itself a function of C, we write: 



+/CxX*\qC - 
4.437$ ^ * J ^|f! v/. 

Now, whenever we see the expression +/4xB, we should consider whether this can be rewritten 
as 4+.xB. In this case, as so often happensfTwfe have a sum of products, and the necessary 
. compatibility eitables us to write: V C 

C+.xX*\pC . 
■4.4375 

We can x therefore .use the function BASE to achieve the same result: 
X BASE $C 

4.4375 , . * y 

Or, what is the saftie thing: 

x 4.4375 

It should be noted thaybecause C is a vector (ppC 1), its leading. axis is also its last, and 
hence <t>C 



^We have looked a/ the case where the X of- the polynomial is a scalar, but if £is a vector, 
then the polynomial must be evaluated for each value |bf X: ^ 

POLY: (<xo .*ipa>)+.xo> , 

.W.5 3.5 " 

'a: poly c a fl * 

4.4375 -"6,. 8125* 

If we use the base function to achieve the same result, X must be a matrix. If it were a vector, 
its elements would be used together (like 24 60 fj>r hours and minutes) instead of separately. 

(Xo.+(pC)po)±<bc 

4.4375 ""6.8125 ' 0 . 

' t 

Or, as we will see is still better, (X<> . + (pC)pO)?eC . / 

Now suppose that several polynorriiajs are to b % e evaluated, eafch with it/f own set of coefficients: 



C*C,L>512 1.3 1.5 ^25 "/ - 

ITT f 2 ■ ' 

x I - 1 - 3 •' • • 

3 1.5 " ' 

0.5 . 0.25 

' In conformity with the rules for matrix multiplication, where the rows 'of the left argument 
, are combined,with the columns of the right argument, the coefficients of the individual polyno- 
mials must, be columns. Now that the C is a matrix, 4*7 'would simply change rhe order in 
which the polynomials are given — rotating about the last axis. As long as C was a vector 
it had only one axis, but now there are two, and to change the order of the terms within each 
polynomial, we must rotate about the leading axis, eC. «• . 

'(*«.+( it p {7)po)j.eC ' 1/ 

"Vi+375 0.21875 , » I* 

"6.8125 "1.1063 

Each polynomial is^ evaluated for each term in X. ' ' 

To see how the BASE function must be modified to produce the\ame result, we "can proceed 
as follows: • r 

/ • 

BASE1: ((l+*x.\*a),l)+ 
ft aia) where a is vector 

Or rearranging to eliminate unneeded parentheses: e 



4 



BASE2: ( 1*4>1, x\4>a)+.xa> 

I 

2* 60- 60 BASE2 12 3 The number of seconds in 

3723 - 1 hour,. 2 minutfes, and 3 seconds 

If a is a matrix and co is a scalar, vector, or matrix: 

BASE3:(0 l+*l,x\<fra)+.x« 
If i4 and 5 are specified as" matrices, as t follows: , ' * 

- A / . . ' /*• 

24 -60 60 Hours, minutes, seconds 

1760 3 12 \ , Yards, feet, inches 

t 

B ■ " • • 

14 

2 5". ' ' " ' . 

3 6. . • \ ' . 

.A BASE3 B ' « 

3723 14706 1 x 

63 210 



4x5 
3723 14706 
63 210 



The function BASEZ will work ihet is a matrix, but not \f a is. a vector. To allow for this, 

we define: - ? 

» ! 

SASS^(^(ppa)tl)+4>l,x\<|)a)+.xw , ( • • ' *• 

Or the clumsier, but for some students more easily understood, form: 

* f BASES: (((("l+pp|tx)pO) f l)^l f x\0a)+.x« * 

24 60 60 &4SE4 S 
'3723 14706 ^ 

But now this will not work if a is a scalaj. A simple way out of the difficulty is to decide 
which algorithm is appropriate by using the so-called "recursive" form, even although the 
function is not itself recursive: 

. BASE6;aBASE^oj:0 = ppa: (a*<J>ilf pw)+.x<j 

A BASEb B 
3723.14706- 
63 210 

• 10 BASE& B 
123 456 4 

If 'both a and w are scalars, then the result is^V (weighting factor df 1): 

* \ 
v y^ASEl:oLBASE6a>: OA ^(ppa) f ppw:lxcj 

After exploring the base function | in this way, the student should have no difficulty^ in 
understanding why Oil 2 3 4*iss the scalar 4, or why 10 1 111 3. "It should also?be 
clear why the following function' will right adjust a character flhatrix: , 

' 7?A7:(1-(cj=' »)±l)<frw m 

and why the following will give the vector of indexes that will alphabetize a character matrix 
provided that oxpoi is not too large: * ^ 

Roy Sykes (1978) has given the following good .example of ±. 

SP5: (•a)[(pajl'(10ipp*)to] 

ft Scattered-Point Selection from array a by indices cj 

To illustrate the utility of T we might introduce a function that, will find the indexes of all 
occurrences of cj ill a matrix a: 

' t IXM>.(pa)r(V=u>)/\pV+-,OL 
JL — 

Those who began by thinking that because base 10 had been good enough for thfcir fathers 
it should be good enough for them, are often excited to discover that there are many ways in 
which i and T can accomplish vegy, practical tasks. They are then ready to read the sections 
on Decode and Encode in Falkoff and Orth (1979, p. 435-436). 



It was interesting that, after conducting this exploration in jhe faculty seminar, a zoologist 
f realized 5hat in .his work'with tide tables he convert* rflatricej oT times in days, hours, minutes 
into vectors of minutes, to .learn how long the tidepools are submerged over a given period. 
He saw £at he could get his result using the function 1 with the left argument 0 24 60, 
and with the right 'argument a matrix whose rows^Je days, hours, minutes, and whose columns 
are pointy in time. ' ' 

We^have \ken the decode function as an example, because it is often not well understood by 
beginners, t\ut every primary function deserves similar study. 

'\ • i ' ' 

' • % . r ^ . * 

Using AixaysV APL 

\ . " . 

It is the constat^ aim of the mathematician to reduce all hte expressions to their lowest terms, 
to retrench every Superfluous word and phrase, and to condense the Maximum of meaning 
into the Minimum of language." (1877) 

r \ * 

l A matrix of quadra\e form - emerges ... in a. glorified shape — as an organism composed 
of discrete part*, but having, an essential and undivisihle unity >as a whole of its own. The 
conception of- multiple^quantity thus rises upon the field vision. [Matrix] ... dropped its 
provisional mantle, its aspect as a mere schema, and stood revealed as bpna-fide multiple 
quantity subject to all the affections and lending itself to all the opfcrationsVordinary numeri- 
cal quantity. ... The 'Apotheosis bf Algebraical Quantity." (1884) 

These quotations; taken from' the writings of James Joseph Sylvester (1814-1897), the self- 
. styled Mathematical Adara, who introduced the term Matrix in 1850, summaries for me much 
of the spirit of APL, ^nd testify to the importance of APL in the development ^ mathematics. 

• j . .. '* % v 

When APL is well written, it takes full advantage of tHe algebra of multiple quantity, 
and would surely have greatLy please^ Sylvester. When FORTRAN employs a loop, 
it is likely that this can v be avoided; in APL by increasing the rank of a variable from 
jl a scalar to a vector. If -FORTRAN has nested loops, APL probably increases the rank 
— Still further. Thus the concept of rank must bef thoroughly grasped from the beginning, . 

and the student should be trained to think about the pp of his variables. 

I have found it important to demonstrate how^e approaches a problem by considering 
the shapes and compatibilities^ the variables. For example, to create a histogram you 
must. have two variables; theflata to be classified and the bounds- that define the classes. 
Because there is no necessary compatibility between these, an outer product is required: 

HIST:PWD +/ot°\>u Where ^ gives the bounds ancl u the data 

WD: (14-6))- l±o) > Pairwise differences 

Any function written for scalars only should be considered as a candidate for extension 
so that it can woijc with vectors, and possibly with matrices and higher arrays. The 
person familiar with the subject matter should enquire what meaning is to be attached 
to such proposed extensions. Scalars are simply scalars, and compatibility ifttween them 
is always guaranteed, but arrays can differ in both rank and shape. J 

The following exampft is a function written by an economist as part of a system to 
compute Double Declining Balance. The formula is cumbersome, and the APL reflects 
( this; but the important point is that the function as written works only with scalars. 



7 Z+R DDB1 T . * 

[1] Z<-((2*T)iR+2iT)xl-((l-2*T)*l+R)*tTi2 

The following functions, in Direct Definition, take^into account the necessary cbmpati- 
bilities of the arguments, and outer products are generated between the vectors of 
different lengths. % 4 ^ 

DDB2:(((qM)p2*u>)*M+*o .+2*u)x$aPVAu • 

P^:l-((l-2Ta>)o.*i+'ot)*f .5xw<>. + (pa)p0 Present Value (part A) 

P 

Where compatibilities necessarily exist between the variables, then inner products are 
probably called for. Students should know.*that 

if Z«-4©.xB then pZ' «-* (p4),pB 

\ 

but if Z«-j4+.x£ ' . then the condition for compatibility of arrays is that 

~ltpi4 «-+ ltpB ' + 

and pZ «-*•" (""l+pi4) ,l+p3 
~r * . * « 

An interesting Example of extending a function that worked only on sca}ars arose in 
an ecological study. Brillouin's measure of diversity of species requires* the logarithms 
of the factorials of large numbers. The direct APL expression far small numbers is: 

*!5 - „' 

4.7875 * 

Because this fails for large numbers, the following recursive function was defined: 
i 

LFA :(•<*>) +£Fi4w-l:<t>=0:0 * - ' * 

a Log of factorial for large scalar co f 

LFA 5 * 
4.7875 . ' ' > 

But Brillouin's Index uses the sum of the logarithms of the factorials, and LFA only 
works with scalars, hence the functions: 

SLF:+/m{V*0)/V+,Mx+\M+u* .>\+/u> 
ft Sum logs of factorials (for BDI) 

BDI:((*10)*+/os)x(9LF+/o))-SLFo) 
p Brillouin's Diversity Index 

SLF 5 
^7875^.. 

SLF 4 2 5 
8.6587 * ' 



• +/«!4 2 5 

8.6587 
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Taking the data from Robert W. Poole (1974, p. 390): J 
V 

235 218 192 87 20 11 11 8 7 4 3 2 M 1 

H+BDI V ' ' 

3.8063 ^ Brillouin's measure is designated H 

#4*10 v 
1.653 t natural bels per individual y 

.the number of individuals is: 

+/V 

802 



B*-Hx+/V V 
•1325.7 The total information content of the collection, in natural bels . « „* 

The following example, proposed by an economics student, illustrates the use of arrays < < 
in defining functions for practical applications. »" - 

The economist Paul Douglas (later U.S. senator) wanted to relate the. Quantity of 
output to the Capital (number of machines) and the Labor (number of worker*). 
Together with a mathematical colleague, Cobb, he defined an expression that i*-known 
as the Cobb- DougEas Production function (Douglas, 1976): 



Q = A.K a L" 



where K is the Capital ^e.g., number of tractors), 

L is the Labor (number of farm workers), t h \ 

and Q is the Quantity produced (e.g., amount of wheat)* / " 

A is a "shift parameter", which enables us to change the*value of Q without' changing 
K or L. K ' , ' . ' % 

. ^ > '4 

a and /* are numbers (usually between .25 and .75) that describe the way in which \ 
Q changes as K and L are changed. There is a special interest in the "case where 
ot + & = 1; i.e., where ' p = i-ot & 

If a) is the vector a, A, K, £, then £ is given by the function ' ' * 0 

' CZ)P:£«>[l.]x(£i>[2]*w[0])xw[3]*l-w[0] . ' S 
For example, 

CZ)P .3 10 2 1 * 

12.311 

However, when the economist writes the function as Q=((K 9 L) y which can be read as 
is a function of K and V\ he shows that he thinks of K and £ as being fundamentally * 



Ml 



different from ot and JC. We might therefore separate the "parameters" ot atid A as the 
.left argument, and let K and L together form Ah e right argument of^e function. 

CDPO: a[l]*(wCO-}*a[0])xw[a]*l-ot[0] • » \ 

.3 10 CDPCF2 \ 

12.311 

.5 15 3 V * 

51.962. v <■ f, % N 

\ 

But this function permits only scalar values for # and £, and we would like t<J see the 
effect on Q of varying, # and L. The function ought to accept vectors of K and L. Now 
for every value of K there fnysfcbe an associated value of.Z; so the right argument must 
be a -matrix. Let u$ assume that the columns are K and Then, instead of raising 
k and L separately to th£ appropriate powers, we use the dyadic * with matrix 
arguments: 

- • { 

CDPl:ct[l]xx/w*(pJO'pct[a],l-ct[0] 



• .3 10 CDP1 2 2 3 3,[.5]1 2 3 4 
12/311 20 30 36.'693 
. * v 
% * .3 10 CDP1 2,[.5jl 2 3 4 
12.311 20 26.564 32.49 



r 



We might modify il.is function so that it coiild accept a vector of values for A. One 
way to do this is to make the economists'^-parameter ot a global variable, A, thus 
reserving the keft argument for the "shift parameter" or "constant". 

I 

Whereas the left argument of the-#-was previously a scalar, and so was automatically^ 
• extended to be compatible with the vector right argument of X, the left argument is 
now a vector and incompatible in length with the right argument; consequently aaputef 
product is needed:. . . 



CDP2:cto .*x/w*(p£u)p4 



^.3 




10 15 20 CDP2 2^.1^2 3 4 5 
12.311 20 26/564 32.4*9 31.983 
18.467 30* * 39:846 48.735 56.974 
. 24.623 40 53.128 64.98- 75.966 

When we saw the expression (A*B)x(C*D) in the first form of the function, we knew 
we could make A and C into the C0UJMNS of 2 matrix Af, and C and D into the 
COLUMNS of a compatible matrix N. Wethcn wrote x/M*N. But this form, f/ M g N 
(where f and g are scalar dyadic functions, taking scalar arguments and extending to 
element-by-element functions on. arrays), can always be rewritten as an inner product, 
M f.g N; thus we have: 



V * 

.7 . , 
10 >15 20 CPP3 2,[.5]1 ? 3 4 5" I 
12.311 20 26.564 32.49 37.983 

18.467 30 39.846 48.735 56.974 - 

24,623 40 53.128 64.98 75.966 N x 

This has the . advantage of automjatipally extending to a matrix^ of 4, whose j 
COLUMNS are successive pairs of exponents. It is worth noting that the function is 
unchanged if a THIRD variable is added to K and L. * 

d^[~.5]l-jr«-.25 .3 .5 
A 

0.25 0.3 0.5 4 ^ 

0.75 0.7 0.5 ^ 

15 CZ?P3 2,[.5]1 2 3 4 5 

2 5 3 ■ 

The result is rank 3; %t. it has three axes for indexing. The axe$ are: 

0 Lengtlrt? 2 +-+ pio 15 the ec&iomists' parameter 4 

1 Length 5 . 5 pK +-+ p £ the economists' variables 

2 Length 3 3 +-+ Olp£ the number of exponent pairs 

It is important to be able to identify any element in R, RiI\J\lC], in relation to the 
original data. The function CDP (which takes only scalar arguments) should be used 
to check your navigation, through the 3-dimenstonal array R. * 



R 

11. 892'. 12, 311 14.142 

20 20 20 

27.108 26.564 24.495 

33.636 ;^2.49 28.284 

39.764 iff?. 983 31.623 

17.838 18.467 21.213 

30 , 30 30 

40.662 3-9.84*6 36.742 

50.454 48.735 42.426 

59.645 56.974 47.434 



/ 

V 



The sequence of the axes is determined by the sequence of the inner and outer products 
in the function CDP3, but it would probably be more convenient to rearrange the axes 
' so that axis 0 corresponded to the exponent pairs, axis 1 to the shift parameter A, and 
axis 2 to the successive pairs of values of K and L. This is done by the dyadic trans- 
pose. To understand this, consider that the transpose of a. matrix is the result of 
interchanging the rows and columns; i.e. the result of taking axis 1 as the leading axis 
and axis 0 as the last axis. 

The monadic transpose of a 2-dimensional array (i.e. of a matrix) is merely a special 
case of the general (dyadic) transpose of ANY array. However, because a vector has 
only one axis, V and a scalar hak NO axes to be permuted. 



1 ' 

Consequently, we can rearrange the axes of R in tljis way; 

PC k ■ 

3 2 5 

Q \ * 

11.892 20 27.108 33.636 39.764 
17.838 30 40.662 50.454 59.645 

" *12.311 20 26.564 32.49 37.983 

18.467 30 39.846 48.735 56.974 

14.142 20 24.495 28 . 284^31 . 623 

21.213 30 36.742 42.426^47.434 

In order to explore the pfbperties of the Cobb-Douglas Production function, ft might 
be useful to provide more structure in the variable. This can be done by raising its 
rank from 2 to 3j* for example: * ^ 

jV4v5 2pfy£i$ 5T-V20 

A*-10 15 • ' 



i i 




© 3 



2 1 

2 2 

2 3 

2 4 
,2 5 

3 1 
3 2 
3 3 
3 4* 

3 5 

4 1 - 
2 
3 

4 5 



Then the product of the powers is: 

JWx.*X.[".5]l-i«-.3 .5 
pi? ■ 



Notice that if 



/ 




i?*v4+ . xB 

then 

% - pi? ^ Cl\pA) 9 UpB ' 

The last axis of the first argument must equal the first axis of the second argument, 
•ariti it is these two ^cjual axes that are eliminated in the inner produdt. 

Tl/e rank is raised to 4 when we use the o/iter product to multiply Jiy the vector of 
shift parameters. The new leading axis has length 3, equal to pA: 

Q^Ao.xR ' 
pQ 
3 4 5,2 

' 

Once again rearranging the axes, we have: 

J ^ 
M 2 3 0$Q 

2 3 4 5 J 

We therefore have 2 sets of results, corresponding to the 2 sets of exponents; each set 
4eing divided into 3 groups, corresponding to the 3 values of the shift parameter; and 
each group being a 4 by 5 matrix, corresponding to that part of the structure of the 
variables in array I that is not lost in the inner product. 

Q 

10 ^ 16.245 21.577 26.39 30.852 

12. 3M 20' .26.564 32.49 37.983 

13.904 22.587 30 36.693 42.896 

15/157 24.623 32.704 40 46.762 

15 24.36§ 32.365 39.585 46.278 

18.467 30 39.846.48.735 56.974 

20.856 33.88 45 55.039 64.3^4 

22.736 36.934 49.056 6Q^ 70.144 



20 32.49 43.153 52.78 61.703 

24.623 40 53.128 64.98 75.966 

27.808 45.174 60 73.385 85.792 

30-.314 49.246 65.408 80 93.525 



10 14.142 17.321 20 22.361 

14. 142 20 24.495 2^.284 31.623 

17.321 24.495 30 34.641 38..73 

20 28.284 34.641 40* 44.721 

15 ' 21.213 25.~981 30 33.541 
21.213 30 36.742 42.426 47,434 

25.981 §6\742 45 ' 51.962 58.095 
30 42.426 51.962 60 67-.082 
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20 > 28:284 34.641 40 44.721 ' ■ • 

- 28.28*4 4t) 48.99 56.569 63.246 • 

#4.641 48.99 60 69.282 77.46 

40 56.569 69.282 80 89.443 

Gathering up the individual pieces, we have the following result: ^ 

1 ^ A/, S = 1 2 3 0 S| AS.xIx>*A,C.5H-A 

Values of Q can be contoured on a plot of Capital, K, against Labour, L. Different 
" contoured maps correspond to different values of the shift paramet^g, A, and a. 
* , 
As4i££haps simpler example of th$ dyadic transpose is the case of an array A, such that 
pA «-* 5 10 12. The three axes .correspond to an account extending over 5 years, for 
10 line items, and 12 months. If A is displayed, 5 tables will appear, each^^vuIifO^ 
rows and 12 columns. 

< 

Now suppose that we wish to have a separate table for each line item, then 
B+-2 0 1 M and pB 10 12 5; i.e. there are 10 tables (one for each line item), 
each with 12 rows (the months) and^5 columns (years). 

Or we might have chosen to create the array 0 2 4? A, so that 

pC +-* 10 5 12; pC +-* 10 5 12 i.e. there are 10 tables, each with 5 rovys (years) 
and 12 columns, (months). 

An Example of the Use of APL in Logic 

The most amusing and readable book on Logic was written by Lewis Carroll, the 
author of "Alice in Wonderland" and "Through the Looking Glass". Although its title 
is "Symbolic Logic", it has rather, little to do with the symbolism Found in modern 
texts on that subject, but Carroll does use formal methods of solving syllogisms and 
sorites. The original edition is rare, but a reprint by Dover Publications Inc. is readily 
available. 

Carroll defines a "sorites" as a set (literally a heap) of three or more propositions 
related in 'such a way that two of them together yield a conclusion, which, taken with 
another of them, yields another conclusion; 'and so on uwtil all have been taken. If, the 
original set is true then the last conclusion must also pt true. 

Onfc of Carrolls's examples (#47 on p. 120) is as follotvs: 

f 

(1) Evfcry idea of mine, that cannot be expressed as a Syllogism, is really ridiculous; 

(2) None* of my ideas about Bath-buns are worth writing down; 

(3) No idea of mine, that fails to come true, can be expressed as a Syllogism; 

(4) I never have any really ridiculous idea, that I do not at once refer to my solicitor; 

(5) My dreams are all about Bath-buns; 

(6) I never refer to any idea of pine to my solicitor, unless it is worth writing down. 
The "Universe of Discourse" is "My ideas", and the "Dictionary of Terms" is: 

1. able to be expressed as a Syllogism 

2. about Bath-buns 

3. coming true 

4. dreams 

5. really ridiculous 
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6. referred to my solicitor 
-.7.^ "Worth ^writing down , ' , 

Using negative numbers to represent "Not", we can write the 6 bilateral propositions 
in this way: ^ r 

- '1 5 r 
_2 - _7 

3 1 

5 6' 

4 2' 

6*7 - •* 

Thus the pair "l 5-xan be read: 

All my ideas that are NOT able to be expressed as a Syllogism 
- a ' e a " really ridiculous 

and the pair 2 ~7 can be read: 

All my ideas that are about Bath-buns 

are a " NOT worth writing down 

This is an example where origin l*is preferred to origin 0, because we wish to 
distinguish between two related cases (true and false) by the use of the sign of the 
number, and we therefore cannot use 0 for one of our cases. 

Now if the proposition "l 5 is true, then fhe proposition _ 5 1 must also be true. 

All my ideas that are NOT really ridiculous 

are 3,1 ' ' able to be expressed as a Syllogism 

Hence every proposition can be inverted with a change of signs 4 

Inspection of the numeric table representing the six propositions shows that, with two 
exceptions, each number (irrespective of its sign) occurs exactly twice. The two excep- 
tions are the terms that occuMn the final conclusion. 

To implemenf the analysis, suppose that the propositions given above are assigned to 
the variable P. Then the complete set of propositions is: 

0]-<}>P ' 

M 

15 • 
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The beginning and end of the sequence, are found by*the function: 
? 

BES:{2=+/No.=V)/N+NUB V+\ ,w 
a Beginning and end of sorites 

NUB: ( (an<d) = \pu*)/<d ^ 
\ 

SES hi 

3 ^ . . " 

The start of the sequence is given by: 

STSicjI ;0l\l fBESu 
a Start for sorites 

STS \M 

2 

W[2;0] ) 

3 Begin with NOT coming true 1 

The end of the sequence is given by: 

ENS:ut;l]\l±BESu , 
fl End of sorites 

ENS \M, 

10 

A/[10;l] 

H End with NOT dream's > 

Hence ~3 ~4 or, alternatively, f 3; i.e. All- my dreams conie true. . 
In order to move from the starting proposition ^fth?"end, we can proceed .as follows: 

J tHtf[;0]*~3 
Z//M[;lJ 
"l .. . 

{Wf[;0]= 1 • 
fc/Af[;l] 




£//W[;l]N * ' •' \ 

y*W[;0]=6". 
U/MliH 



y^[;0]=7 
£//«[; 1] 

IWU[;0]=~2 



That this is the end, is shown by: 
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~H . ... . 

i/-^W£;0]=~J+If we proceed, the result is empty: 

* * 

Consequently, we can get the sequence by recursion, stopping either when we reach 
thc/known end -proposition or when the result is empty: 

/?5A:(a t («[^>0xc0/iaC;l]/?S/?«:i4=0xa:o 



a Recursive "sorites 



Recurs 



X 



^ ✓SflS : uiSTS | ai ; OjASffw : 0 , OpA+<a[ENS 1 ] : 0 
, o Sorites - 

I SRS AT 

, 3 1 5 6 7 "2 "if 

The sequence needs to be obtained as a function' of P, and it must be reversed if it 
starts with a negative: 

IXSiZidrliZ+SRSoftlOl-fai-fa % . « 

a Indexes of sequence of sorites 

- J™ J 

k 2 ~7 6 5' 

Finally, to translative result into English we need the following text data, with 'Not' 
appended to the enij. of each line. 

* A 

DATA v\ 

able to be expressed a\ a Syllogism Not 

about Bath-buns' * ' Not 

coming true . Not 

dreamy Not 

really ridiculous v * Not 

referred to my solicitor Not 

worth writing down Not 

The function Carroll will then reorder the terms,-and rotate where a NOT is to be 
inserted: r ' 

CARROLL :Q ^H'W<0)^aCU\MX&a;2 
a a is text, a is numeric matrix of propositions 

DATA CARROLL P 

dreams 

about Bath-buns 
Not worth writing down 
Not referred to my solicitor 
Not really ridiculAis 
able^ta be exprested as a Syllogisih 
coming trup H v • a * 1 
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The conclusion is: All my dreams come true 
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Data Bases with Multiple-Line Entries 

A surprising .rfumber of 'students wished to create a simple data base system. I had 
provided a workspace with a fairly powerful simulation of IBM's product "Query-by* 
Example", and had explained the principles involved in its implementation. The stur 
dents could use this as a modj^lf both to get ^xjl^ience in using such a system aijd 
to' understand how such a sytftem can.. be created in APL. However, £ wanted them 
to write their own functions. Although the lessons I learned in writing the system in 
Direct Definition are ^relevant to the subject of this paper, a listing of the Junctions 
is too* long to include here. 

* ' i 

One of the problems encountered by student^ was how to handle the case where some 
items consist of multiple-lines. We did not have time to implement *a system of arrays 
of arrays, but th? following illustrates what might be considered to be the first step 
ih ^dealing with the problem. - 

Consider the foSowing data base: 





D 








0 


0 


2 


2 


1915 


1 \ 


2 


- 4 


1 


1860 


2 


6 


3 


0 


1826 


0 


9 


1 


2 


1912 


2 


10 


1 


0 


1830 


3 


11 


1 


0 


1835 


2 


12 


i 


0 


1837 


o. 


14 


2 


2 


1909 


2 ' 


' 16 




0 


1820 


2 


20 


2 


1 


1818 



\ 
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This matrix represents a bibliographic file giving Author, Title, Type of publication, 
and Date. With the exception of the date, Z?[;*0, the numbers in any column are 
pointers to supporting character arrays. Z?[;0] points to a table of Authors, AU; 

points to the START of the Title in_a table of Titles, TI; Z?[;2] gives the 
number of lines to betaken from TI, so that 1++/Z?[;1 2] points to the LAST line 
of each tide in TI; and Z?[;33 points to a table of "Types, TYPE. The supporting 
character arrays (which were conveniently entered by the use of IBM's Extended APL 
Editor) are the following for this example: • . 

' AU 

Shaw, G.B. • • 

Tennyson, A: * / 

Scott, W. 

Dickens,^C. * " 

Good^ing Charges' Golden Days: 

A play 1 for 6 characters. * 

Idylls of ' the 'King: - . * * 

A poem describing the Life and Times N 
of King Ar'tKur and the Knights of 



v . 28 



the Table Rouhd. 
The Heart of Midlothian: 
• being an attempt at a Historical 
Tale of the Olden Times. - . 

Major Barbara. 

The Antiquary. t 
Nicholas Nickelby. 

The Tale of Two Cities: ' ' 

Paris and London. . _ / 
The Doctors Dilemma: 

the problems of medical practice. ^ 
Wav^rley: 

or Tis 60 Years Since; * 
the story of what followed the 
late attempt at' Revolution. 

Marmion: . • 

' being Prelude to the Battle of Flodden. 

v. 

TYPE ' \ 
Novel . ' 

Poem u 
Play ** 

The problem, of course, is that* whereas, the Author,, the Type, and the Date each take < 
a single line, the>Title takes a variable number of lines. Consequently we must expand 
the selected Authors by inserting blank lines to maintain compatibility with the multi- 
line titles. The Type and Date must be expanded in the same way. This is complicated 
by the fact that when we select from Z), we rearrange the order of the Titles, and thus 
change the pattern of, multi-lines. However, all the information needed for the solution 
is in Di%i 2]. Note that the cesqlt'is an "Unnormalized Relation" ijt RelationaJ Data 
Base terminology. ■ * 

The functions needed are as follows:* 

/?IAr:(( w *0)/ip w )["l++\"l<(>v/(+\ w )o.=i +l+ / w 3 fl Repeated indexes 
CTI:((RIX i[;2])€ft)/ipo[;2])/K a Compress titles # 

^pri4>(ii < tp w ) € ~i ++ \ a m ^ . . - 

ft Expansion vector needed for compatibility with w as prescribed by a 

PRINT: (V\m<o/cLli0l;l) 9 MAVHJali21)EXP M«xCTIu>) V««?[a[ ;9] ;] ,Ta[ ; ,4] 



In order to understand how' these functions work, consider the following illustrations: 

• R IX 2 4 3 , '■ "Repeated indexes" * ' 
CUO 11112^2 \ . 

f^-£[;0j=2 . ' Author with index 2 
W 

0 D 1 0 1 b 1 O'l 1 
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D CTI W 
The Heart of Midlothian: 
being an attempt at a Historical 
Tale of the Olden Times. 
The Antiquary. 
The Tale of Two Cities: 
Paris and London. 
Waverley: « 
or Tis 60 Years Since; 
the story of what followed the 
late attempt, at Revolution. 
Marmion: 

being Prelude to the Battle of Flodden. 



Titles of works by Author 2 



J//Z?[;2] 
3 1 2 if 2 



Numbers of lines in the titles 
of works by Author 2. 



VHV/Dli2]) EXP D CTI W 
V 

100110100010 



Expansion vector for compatibility 
with the titles. 



Scott, W. 



WD[;0];] 



Expand the list of selected Authors. 



Scott, W. 
Scott, W. 

Scott, W. 



Scott, W. 



1. To print the entire data base, we make the selection with a vector that is all l's. 
The scalar 1 will extend as needed for compatibility. 



■ D PRINT 
Shaw, G.B. 

Tennyson, A. 



Scott, 'W. 



Shaw, G.B. 
Scott, W. 
Pickens, C, 
Scott, W. 



Good King Charjes' Golden Days:< 
A play for '6 characters. 9 
Idylls of the King: 

A poem describing the Life and Times, 

of King Arthur and the JKnights of 

the Table Round. • 

The Heart of Midlothian: 

being an attempt at a Historical 

Tale of the Olden Times. 

Major Barbara. 

The Antiquary. 

Nicholas Nickelby. 

The Tale of Two Cities: ^ 

Paris and London. ^ ' 



Play 1915 
Poem 1860 

Novel 1826 



Play 1912 
Novel 1830 
Novel 1835 
Novel 1837 




Shaw, G.B. The Doctors Dilemma: - Play 1909 

the problems of medical practice. 
Scott, W. Waverley: Novel 1820 

* or Tis 60 Years Since; ## * 

the story of what followed the 

Jate attempt at Revolution. 
Scott, W. # Marmion: • Poem 1818 

being. Prelude to the Battle of Flodden. 

2. To select all works by Scott (Author 2): 

D PBINT 0[;O]=2 
Scott, W. ,* . The Heart of Midlothian - Novell 826 

being an attempt at a Historical 

Tale of the Olden Times. < t 
Scott, W: The Antiquary. Novel 1830 

Scott, W. The Tale of Two Ciltes: Novel 1837 

Paris and London. - 4 

Scott, W. ' Waverley:. • Novel 1820 

or Tis 60 Years Since; 

the story of what followed the 

late attempt at Revolution. 
Scott, W. * , Marmion: Poem 1818 

being Prelude to the Battle of Flodden. 

3. To select all works of 'poetry (Type 1): 

D PBINT Z?[;3]=l ' 
Tennyson, A. Idylls of the King: Poem 1860 

A poem describing the Life and Times 
/ of King Arthur and the Knights of 
the Table Round. 

Scott, VV. Marmion: I Poem 1818 

J>eing Prelude to the Battle of Flodden. 

4. To select Plays and Novels (Types 0 and 2) published after 1830: 

" D PBINT (0[;3]eO 2)aZ?[ ;\3>1830 

-Shaw, G.B. Good King ^Charles' Golden Days: Play 1915 

A play for 6 characters. « 

Shaw, G.B. ' Major Barbara.^ Play 1912 

Dtekens, C. ^ Nicholas Nickelby. . . Novel 1835 

Scott, W. ■ The Tale of Two Cities: Novel 1837 , 

Paris and London. * \ 

Shaw, G.B. The Doctors Dilemma: Play .1909 

the problems of medical practice. 



Conclusion 



Some people object to APL, claiming either that it is "mathematical" or "inefficient". 
APL is rich in symbols, and there are those who seem to have real difficulty in using 
symbols as a tool of thought. This appears to "be the reason why one heafs. objections 
to APL's mathematical content. Such people prefer; to spell out every detail of a process 
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(as one is obliged to do in a language like FORTRAN), or prefer PLUS to -f-, because* 
they have not yet learned^the lesson that Sylvester so eloquently taught a century ago, 
It takes time and patience to work with students who have this difficulty, to convince 
them with simple and meaningful examples thatrthey can learn to use symbols to add 
power to their thinking. This is an old proble^n As I pointed out at the APL Users 
Conference in 1978, Oughtred faced the same difficulty when he introduced f the symbol 
x for multiplication. Students are greatly helped when they manipulate arrays that are 
meaningful to them; a student of language can transpose a multidimensional arr^y of 
verb endings (where the axes are conjugation, tense, singular-plural, person, and indi- 
vidual letters), whereas a student of business will gain, a similar experience from 
transposing an array representing financial accounts (where the axes are year, month, 
and line-item). 

The objection^ the'grolinds of supposed "efficiency" js best answered by demonstrat- 
ing that practical results can be obtained far more quickly in APL than by any 
alternative. It is important that students have some experience with another language 
(preferably FORTRAN or COBOL) because these arfe still s6 commonly used. But, 
although some will be compelled by an employer to work in these languages, there will 
be few who will do so by choice after they have used APL. Moreover, if machine 
efficiency is really tfoe issue, then it is hard to\see why the programs are not written 
in machine language. I included an introduction to Assembler in my course, so that 
students would know what this means and would understand a little better what goes 
on inside the machine. But for a Biologist, an Economist, or other scientist or humanist 
to be working at an/ level other than APL seems ^o me to be where real inefficiency 
of valuable resources is serious. ^ 

Quite apart from its obvious utility as an aid in oU^solutiop of practical problems, 
APL q$n claim a key position in the curriculum of aCiberal Arts College, Benjamin'' 
Franklin, among others, said that man is a tool-making animal. The modern epmputer 
is the most powerful and universal tool so* far created, and as such its study has a 
special importance. APL is not only the best way to learn about computers, for example 
with APL the student can design and operate a simple computer of his own, hut it 
is part of the historical tradition and evolution of mathematics and symbolic thinking. 
This is what makes APL an exciting subject that should be included wherever the 




I am grateful to K.E. Iverson (I. P. Sharp Associates) and P.B. Yale (Pomona College) 
for suggestions^ that have been . incorporated in this paper. 
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TEACHING APL IN AN ACADEMIC ENVIRONMENT 



Gillian Wade 
Institute of Computer Science 
University of Guelph 
Guelph, Ontario 



Introduction - 

<- * 

The unfortunate division between scienfists and non-scientists first explored so' 
perceptively by CP. Snow in his seminal work The Two Cultures (in 1959) has not 
appreciably narrowed in the intervening years; rather, the continuing technological 
revolution has, 1f anything, exacerbated this seemingly unbridgeable chasm. The 
paradox, of course, is that the mounting wave of technological achievement is largely 
due to specialization — in universities and industries, research labs and businesses — 
and, in turn, its maintenance and further development demands ah even Jjigher degree 
of specialization One of the most important and frustrating gajis today is between those 
people (and not all of them are scientists, by any means) who Wei comfortably at home 
with computers and those who don't. 

As computers play,* an increasingly important role in all our Ws (which critics, 
unfamiliar with these nfachines, darkly hint is an ominous intrusion), it becomes 
imperative that we strive to dismantle the barriers that exist and neutralize the growing 
polarization between "them" and "us", and work towards a more widespread ' 
acceptance of the computer as another powerful and highly useful tool, which should 
not be beyond the grasp of any reasonably intelligent person to use. 

Those "of us who are already, involved fn this exciting and ever-expanding field must 
remember, as one of my students pointed out in his feedback comments, thafthere is 
"life beyond' computing", and it is lip to us, to all of us, to reach out beyond our ivory 
towers and computing centres and spread the knowledge and share the; experience we 
have gained. We have an obligation to our non-computing colleagues to do our best 
to dispel the .modern myth of the computer as a mysterious and infinitely complex 
"black box with flashing lights" that can only be used by a highty^trained and 
specialized elite. Computers are for everyone to share! Indeed, the rapifl growth of the 
home-based microcomputer industry is hopefully an early clue to the new direction, 
but there is^still much for us to do. 

For many years, computer professionals have too often <been their own worst enemies 
in forging the negative image so manv people have of computers, for everything they 
did was couched in highly technical jargon and complicated buzz-phrasfes. Simply to 
'use the machines'reqi^ed more £an a passing familiarity with what made them run, 
anc} an extensive knowledge of the intricate computerese of COBOL, FORTRAN, 
ALGOL and, so on... but there' is no longer any. excuse for this situati&n, for now we 
have an ideal language for noh-compjiter people: APL. 
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APL at Guelph 



The joy ol* APL is that it allows so many people, with-so many diverse requirements, 
to use the resources made available through the computer with a minimum of technical 
Jcnow-how. The -comparatively easy acceptance of APL is as apparent in the commercial 
and industrial world as it is in the acadeihic environment with which I am ntost 
familiar — perhaps even more so, for unf6rtunately, many computing science professors 
still seem to regard APL as a rather fun toy .but not the first choice as a language 
one wdftlcl select for any serious work. 

One of the most gratifying aspects of my own role at the University of Guelph is the 
opportunity I have to introduce young school-children to the world of computers. Each 
year, several special groups, many with children as .young as the age of ten., come -to 
the Institute of Computer Science for an introductory course in APL. 'These young 
people have no pre-conceived notions or fears of the machine and within hours of their 
first acquaintance with the system they are happily using APL at their terminals with 
far greater ease than I remember my own generation acquiring the three "RY\ which 
is a promising indication of future trends. 

Older students — and I don't just mean those enrolled in university undergraduate 
courses — are a somewhat different matter, and the manner in which these people 
are introduced to computers, in general, and APL in particular, is of great importance. 
The wrong approach can even aggravate rather than overcome the latent suspicion and 
even dread of computers that, as I have remarked, is still so widespread among thosQ 
with little or no computing experience. There are probably as many ways to teach APL 
as there are rival theories for the teaching of conventional foreign languages, but I will 
•outline here what we are doing with marked success at the University o(-Guelph, and 
hopefully you will find at least parts of our approach toT)e useful in your own situation 
if you are faced with the job of arranging an introductory APL course for students, 
employees or clients. » ' „ * 

At Guelph, degree courses in computing are offered by the Department of Computing 
and Information Science, but despite the dramatic growth in the use of time-sharing 
on carrtpus over the past few years they still have no credit course where students can 
learn APL. The proeeduraHanguages have traditionally been , dominant for it is felt 
that they give students a better understanding of the technological sub-structure. Ohe 
or two of the introductory lectures, as well as courses offered by the Department of 
Mathematics and Statistics, do include a brief discussion of APL. But as one leading 
faculty member confessed to me, the primary reason that this situation has not changed 
is because of bureaucratic inertia. 

However, students in such diversev disciplines as Economics, Zoology and Hotel 
Administration are oftfen required to use APL for some of their assignments; in 
addition, an increasingly large group among the faculty and administrative staff are 
discovering the convenience of APL to help with their re^arch or data processing. To 
meet this demand, all formal APL training has become the responsibility of the Institute 
of Computer Science, the organization which handles the bulk of computing services 
for the fcampUs. 1 ' ' 

The institute offers- £ regular non-credit introductory course in APL, as vyell as many 
■ad-hoc seminars to inform users of new features, tricks and techniques, we've developed, 
iiew public library programs, ' and more sophisticated APL topics. Some people, of 
course, have managed to learn APL on their oWn, with just a little help from Institute 
staff, as a means of solving problems in /their particular discipline, bift the majority 




of our users have at some time taken our introductory tourse. I'd like to outline now 
how our course is organized, and why we have chosen to do it in this particular w^y. 



Our APL Teaching Program 

Our first course in APL was offered in September of 1970, at which time some 30 
students were introduced to this versatile language. A decade later, we are teaching 
j well over 300 people a year, and indications are that demand will continue to be high. 
In this ten-year period the course has gone through several changes. We have now 
arrived at a format which we feel best suits the needs of our users, though of cb'urse 
we are constantly refining the content in line with the evolution of the language itself. 

Obviously, some of the considerations we have had to bear in mind won't necessarily 
apply ip your case. For example, our courses are taken by an extremely diverse group> 
oFpeople, including undergraduates, graduate students, faculty members, researchers, 
administrators and technicians. Their computer expertise ranges from none at all to 
several years experience with some of the more traditional languages and systems, A 
company organizing an APL course for some of its employees, for instance,* can expect 
a more uniform group of students. We are also fortunate in that all the individuals 
we teach are highly self-motivated. Scpne of them merely want to acquire a minimum 
amount of compOter expertise to apply to their own field of interest, and have choseri 
APL as jhe most convenient tool, while others are interested in extending their' 
computer skills and becoming "APL programmers themselves. 

It is most important to first analyze your potential audience in order to achieve the 
right level of presentation. It's very easy to oversimplify and spend a disproportionate 
/t amount of time on what may be a trivial topic; and it's equally ea^y to take for granted 
concepts you have already mastered but which may be more difficult for a rtovice to 
grasp at the first introduction, skimming over points which may deserve more detailed 
explanation. Once you have , lost your students' attention, whether from 
oversimplification or overcomplexity, it can be hard to regain it. The dividing line is - 
not at all- clear, nor is it always possible to achieve, but it does make the task easier 
if some initial assessment of this kind can be made. • ( ' 

Another factor that has influenced the presentation of Guelph's APL course is the 
available technical facilities and teaching personnel. Because of physical limitations, and 
because, we have found that a smaller group is more rewarding both for the teacher 
and the students, we have an enrollment ceiling in each of our classes. At the momeri 
this, ceiling is 30 people, which we feel is still too high, but because of resour£ 
-constraints we are unable to lower it. The ideal arrangement, perhaps, is to have every 
student seated at his or her*t>wn terminal so that they can immediately try out each 
new concept as it is presented by the instructor. Unfortunately, we are far frofn 
achieving this, one-to-one goal, and so we have had to adapt'to-what is available. There 
is a CRT in the classroom for the instructor's, use, and our computing laboratory is 
equipped with 26 terminals for everyone to use. In addition, several public' terminal 
pools and departmental machines ensure that no one has difficulty in 'getting access 
to the computer at times of tfieir own choosing to try their hand at APL. 

The .demand (or places is high, and so each semester (that is, three times a year), we 
teach at least three separate courses. Indeed, Mast summer overflow Registrations 
necessitated the scheduling of two adaitional ^sessions. The timing is important, since 
many of our students need to learn their APL early in the semester in Order to apply ' 
it to their other work. So we arrange overlapping rather than consecutive courses, and 
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each >^sion is taught by a .different staff member, none of whom, incidentally, is a 
professional lecturer. 



It was decided early on that uniformity in presentation was important, since we wanted 
to ensure that students taking any of the sessions all covered the same material, and 
we wanted to make it easy for a student who was unable to attend, say, the second 
dass of his particular group to sit in on the same lecture with another group at Another 
time without missing anything. Obviously, the personal enthusiasm and knowledge of 
the individual instructors will have a decisive influence on his teaching style and his 
audience's appreciation of the subject, but by providing a uniform framework for the 
coufse we believe we can supply our students with the best instruction while at the 
same time making it easier for newcomers to our APL team to teach the same course 
by giving them the benefit of our cumulative experience. Everyone uses a common set 
of notes, slides and assignments, which naturally reduces time spent on class 
preparation. Introductory manuals on APL. .and the file subsystem are given to all 
attendees. There is no required textbook, though we are frequently asked if there is 
one available. We recommend "APL: An Interactive Approach" by Gilman and Rose, 
and Paul Berry's "SHARP APL Reference Manual" is also becoming popular. 

, Originally, three separate mini-courses were offered, but since most people took all 
three anyway, it seemed more sensible to amalgamate them into a single introductory 
course. This course is divided into six modules^ each three hours long, given tjvice a 
week over a period of three weeks. So students receive a total of 18 hours of formaf 
instruction, 12 in the classroom and 6 hoys of supervised practice in the laboratory. 
This format is well suited to the needs of our students, and, again, our experience has 
indicated that dividing the material into smaller "chunks" with breathing space for 
practice in between makes it easier for them to learn than presenting a concentrated 
course jammed into a couple of- days. The threshold of "mental indigestion" is fairly 
low, and though crash courses can be effective, we do not feel this approach is 
appropriate for our purposes at the introductory level. We have recently experimented 
with spreading the course over a six-week period, but the consensus is that a seven-day 
gap between classes is too long, and the. present scheduling seems to be the most 
effective. • 4 

During the two-hour classroom period the instructor demonstrates each point using a 
terminal hooked into TV monitors, and students are encouraged to ask questions and 
discuss v^fious points at any time* Immediately after the lecture there is a one-hour 
»lab session in.which students can take turns at the terminals to get some "hands-on 0 
experience while the teacher is present to give answers and deal with problems or 
misunderstandings. Some simple assignments irt given out and the students' are 
expected to spend time at the terminal on^heir own to try out what has been covered 
in class, for only when the theory is put into practice is) it possible to see if the concepts 
were understandably pregenteH. Any difficulties or "fuzzy' 5 areas are discussed at the 
^beginning of the ne;ct session. Because of the students' differing interests it isn't possible 
to tailor assignments specifically to everyorie's needs, and so instead we chobse exercises 
and examples from the'st^ndard textbooks. 81% of the students complete m9st of the 
assignments, and of those unable to do them all, 88% said they were unable to find 
the time. This is an fnsoluble problem, however, for many were still unable to devote 
more time even when the course was' spread out over six weeks. 

The six mpdules have been constructed *so that each builds on the. others, forming a 
continuous whple, while at the same time being sufficiently self-contained to allow those 
people who do not wish to attend the full course to sit in on just those topics they wish 
to cover either to get started or for revision purposes. The first session introduces the 
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. 1 

concept of time-sharing in general and the basic elements of the APL language, 

including: monadic and dyadic scalar functions; the concept of scalars, vectors and 

matrices; assignment; selection using indexing, take and drop; the reduction and scan 

operators; and rhp.# 

» . * 

In the second class, students learn workspace management,, the more frequently used 
system commands, system functions and system variables, and the APL public library 
'Structure. For some, this is-as much as they will need. Some 70% of the students, 
however, proceed to the third module which covers more of the language including the 
relational and logical primitives, character data, compression and expansion, selection 
on matrices, inner and outer products, and a variety of other array manipulations. The 
, fourth and fifth sessions cover writing,' editing and debugging programs, branching, 

mixed output, quad and quote-quad. Students are given a programming assignment 
whjch is demonstrated in class. The final lecture is devoted to a brief overview of \he 
APL file system. 

f 

A recent survey of all the Institute's non-credit courses provided some interesting 
^ statistics about how readily most people accept APL. 94% of those responding who had 

taken our APL course stated that their interest in computing had been increased, and. 

92% now found it easier to use the computer. Nor were these all novices; about half 
N had had other exposure to computers. 87% stated that they had been able to apply their 

new-found knowledge *e-}heir own work. One reseacher lauded APL as giving him 

a "quantum leap" in his ability, to analyze his data. v 

A look at some of the APL projects* now in use, or being developed on campus also 
offers an intriguing gJimpse of the rich variety of applications to which the language 
is being pjut. APL- is qsed for diet analysis, for the simulation of a hotel's back and 
front office operation, ty teach perspective drawing for landscape architecture, wildlife 
management, and to maintain personal bibliographies and collections of references. On 
the administrative side, an APL system maintains all the University's complicated 
budgeting. A veterinary professor, delighted at the new prospects opened up to him, 
bought a terminal and a flat-bed plotter and quickly wrote some simple APL programs 
to produce graphs of equine electrocardiograms and other research data of a 
sophistication that previously had been almost impossible to achieve/For several years, 
a group of physicists had been attempting to translate some extremely complex matrix 
convolutions for analyzing X-ray spectra into FORTRAN. Within three months of 
^ taking our introductory APL course, they had successfully produced the results they 
wanted. True/ they spent ten thousand dollars to do it, but they have written^everal 

* major research papers about their findings, a,nd they now* have a system vvhich, as far 
as we are aware,' is the first to apply these APL techniques to atomic physics. 

» ■ . 

S" , Conclusion 

We strive constantly to improve our courses to provide the best training we possibly 
can, and feedback from our students is important to us. Each persoh attending is asked 
to complete a course evaluation form, and these are used to define ouir areas of weakness 
and try to improve them. We spend a great deal of time consulting with and giving 
advice to our students after they have completed the introductory course to help them 
develop their own APL skills. To provide easy access to the computer, free account 
% numbers, with a modest spending ceiling are provided to users who have no other source 

• of funding. As an indication of the wide use of APL, these free numbers accounted 
for some 30,000 computing dollars in the past fiscal year even at our comparatively 
low internal rates. 
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Where do we go from here? A common problem facing all academic institutions in 
the coming years will be tackling an increasing workload with the same number -of 
personnel, and with even less in some cases, in the face of cutbacks in educational 
spending. In business too, individual productivity will assume ever greater importance 
and since this is an area in which APL excels, its use will inevitably continue to grow. 
At Guelph, we are planning to upgrade our APL self-teaching courses- so ,that the 
computer itself can play a more prominent role in teaching its own use, and we would 
like to develop pre-recorded audio-visual presentations, thereby reducing some of the 
load on our human resources. ♦ 

As several of the other papers presented here have clearly demonstrated, APL offers 
many technical advantages over rival computing systems, but I hope this account of 
our training methods at the University of Guelph has demonstrated yet another virtue 
of APL, in that its comparative simplicity and flexibility make it the ideal language 
for teaching computing to those people who need it as another tool for use in their . 
own particular area of interest. And in offering a relatively painless introduction to 
the ei\ormoils benefits pf computer resources to people with iittle or no previous 
experience, it is building a sturdy bridge across that gap which divides so many 
specialists in both academic and non-academic environments. 




APL IN THE CLASSROOM 

* 

E.M. (Ted) Edwards 
Simon Fraser University 
Burnaby, B.C. 



Abstract 

The author has used APL as a teaching tool in courses directed at students ranging 
from high schoof to senior year at university. Topics in these courses have included 
computer programming, curve fitting, mathematical logic, set theory, predicate calculus, 
computer hardware design .and others. APL has been used as a language of discourse, 
as a programming tool for student use, and to produce software for editing lesson 
material and for presenting examples "on-line" in the classroom. Examples of lesson 
material are included and the reasons for the success of APL in this environment are 
discussed. Some limitations, are also examined and a few possible extensions suggested. 

Introduction 

The author has used APL in the classroom in two distinctly different modes. In th$ 
first, the objective has been to teach APL and in the second, to teach some other topic. 
In this second case, A$fe^s*been used as a language of discourse. That is, having 
examined various notations used in the subject field > the aCithor felt that APL offered 
the students advantages that more than, offset the overhead of learning a new notation. 

« 

Regrettably, many teachers of elementary mathematics courseX>verlook the power of 
array notations to convey functional concepts through the examination of patterns 
(something the human mind is very good at).. This oversight occurs -since it is generally 
believed that arrays and array operations are much more difficult to understand. This 
is, in fact, true if one restricts oneself to conventional notation. APL provides a notation 
in which the generalization from single element operations to array operations occur 
in^a straightforward and comparatively simple fashion. Some examples will be given 
below. Fortunately, APL has (to a very large extent) the property that "what you don't 
know won't hurt you". That is APL may readily be subletted or % , in' other words, the 
teacher need only introduce as much as is needed ^o meaningfully discuss the subject 
matter at hand. Further, even this subset may be introduced only as each aspect is 
needed. In any course the author has every taken or taught, this has occurred .anyway 
as the instructor found it c6nvenient to introduce special symbolisms to expedite the 
discussion It is not, then, as drastic a step as it may appear to introduce APL as a 
notation. In every class' the author has taught in which APL has been .involved, the 
concept of Scalar functions^ applfed to arrays has been introduced early in the first 
lecture without apparent difficulty. (See sample lessons 'included in this paper.X 

At the present 0 time, few textbooks are available in which APL has been used as 
notation. This can mean a considerable amount of extra work for the instructor as it 
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must be recognised that the order of topics and their presentation must often be 
radically altered. The problem is akin td'that of translating .poetry. The idioms 
available for expression are different in different languages. Jt gdod translation must 
present the material in idiomatic 'form in the target language. In the context of this 
discussion, tKat often means considerable effort rearranging the material for 
presentation fn APL. It is the opinion of this author that the investment is often 
warranted. 



Teaching A£L 

Shown belo^is the outline for a three Week course in computer programming taught 
by the author, ^his course is offered as part of the Simon Fraser University Summer 
Computer Institute. It is directed primarily towards high school students as 3n 
enrichment program. Students from 'grades eight through twelve plus a few of their 
teachers have takfcn the course. The primary objective is to learn to program a corrfpufer 
tn ABLy although the concept of the notational use of APL is introduced early anti 
used throughout. Those students who have some computing background in another 
language (usually BASIC) present some of the greatest difficulties in terms of 
misconceptions about computing that need to be dynamited. The worst of these are with 
regards to modularity and the nature of iteration as distinct from loops used to express 
what .are in reality disguised array operations. 



( 



Easy as APL ol < 
, An Introduction To APL 
Course Outline 



LESSON 1 



Expressions* and results 
Some APL primitive functions 
Vectors 

Names for data objects 
Defining your own functions 




LESSON 2 



Tables and matrices 



* More primitive functions ^ 



» Indexing * 
• Character strings' 
Arrays of truth values 

Graph plotting as an example of array thinking 



LESSON 3 * 



Some more primitive functions 
Automatic scaling for a graph plotter 
Manipulating arrays . 1 



LESSON 4 



Character strings and their handling 



LESSON 5 * . 

V^jfat is inner product? 



LESSONS 

Simultaneous equations the easy waV 

; LESSON ? t - 

Polynomials and curve fitting^^ \ ' ' 

LESSON 8 ^ . ■ ^ \ 

An example of visualization^ array operations 
Projections in N-dimensional spaces 

The remaining time will be spent assisting students to implement a project of 
their own. • \ 

The first eight to ten days are spentrg&ng through the material of the eight lessons. 
Mornings are spent in classroom lectures and afternoons are spent gaining "hands-on" 
experience. An^MCM APL computer connected to two large screen video monitor* is 
used to present the material of ttfe lessons in class.. A set of hard copy notes if also 
given to , the students. The technique of preparation and presentation of the/lesson 
material is the 4 subject of another paper (Edwards 1). Students have access/ to the 
university's MT^APL system running on an IBM-370/148 and to some MCm APL 
stand-alone systems for their practice sessions. The final week of the course i\ spent 
on individual projects with the instructor and an assistant available to provide help and 
to suggest appropriate programming techniques. Portions of lessons 1, 5 and 8 are 
shown below as an indication of the presentation. , 
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A EASY AS APL oi "(LESSON 1) 

EXPRESSIONS AND RESULTS 
2+3 

2+3+4f5 9 + 

(2+3)x(if+5) 

nMfalMUM .< • r f IS READ 'MAX' ) 

2T3 • 

7^5 ' 

~3f~l 

*AS IOU WOVLB EXPECT, ■ L 1 IS MINIMUM. ' 
2L3 

{ 

ARIGHT TO LEFT EVALUATION OlRDER 
2+3x4+5 



29 
9 

4.5 
6 



2+5F3+4 

9*2 J 



4+6*2+1 









a VECTORS 










2 3 


1+3 


4 


5 


5 


7 


6 








r 








2 2 


2+3 


4 


5 


5 


6 


7 


2 + 3 


4 5 


6 




5 


6 


7 


8 














513 


4 5 


6 


7 * 


5 


5 


5 


6 7 














2 3 


4x5 


6 


7 


iO 


18 


28 














2 3 




3 


2 


5 


3 


4 
















2 3 


415 


3 


1 


2 


3 


1 
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2 3 


4 


5 


1 


2 


3 


3 3 









a 

a'a'IS READ LAMP. THE STATEMENT THAT FOLLOWS IT 
*IS FOR— ILL UMINATION ONLY (I.E. A COMMENT). ■ 
*NAMES 

DATA+2 3 4 5 6 

nNAMEx A STRING OF LETTERS OR NUMBERS BEGINNING WITH A 

* LETTER. f + f IS READ f I5 f AND ASSIGNS A VALUE TO A NAME. 

DATA 
2^456 

2* DATA ' 
4 6 8 10 12 

a EASY AS APL o\ (LESSON 5) 

A 

a INNER PRODUCT 

A 

Ad// EXAMPLE OF AN INNER PRODUCT EXPRESSION: 
2 3 4+.x3 2 1 

16 

' *0BSgRVE THAT WE OBTAINED A ONE ELEMENT RESULT FROM TWO 
nVECTOR ARGUMENTS. YOU SHOULD VERIFY THAT IT WAS IN FACT A 
^SCALAR. CONSIDER THE TWO EXPRESSIONS : 
2 3 4x3 2 1' 

6 6 4 

+ /2 3 4x3 2 *1 - + # ' 

16 

PkFOR VECTORS a AND w» AND SCALAR DYADIC FUNCTIONS F AND G, 
*(aF.Gu)=F/aGa. CURRENT APL' S ALLOW INNER PRODUCTS TO BE 
* FORMED FROM PRIMITIVE FUNCTIONS ONLY. . INNER PRODUCTS MAY 
*BE APPLIED* TO HIGHER RANK ARRAYS BY REGARDING THEM AS 
^ARRAYS OF VECTORS. STUDY THE EXAMPLES BELOW TO SEE HOW 
*THIS IS D0 t NE. " - 

A 

A +.X , 

A 
A 

A A 

A 1 2 3 1 

A ,2 3 1* 2 
A 3 1 2 3 

A 

+ / 7312x4432 



is 



2 


5 


4 


3 


1 




3 


5 


4 


2 


2 


B 


5 


4 


3 


1 


3 




5 


4 


2 


2 


S 




28 


31 


2*3 


12 


19 


/ 


28 


37 


27 


17 


21 


X+.*£ 


34 


40 


28 


19 


26 





27 



1 0 
0 1 
0 0 



A+.x IS * ORDINARY'* MATRIX MULTIPLICATION 



EASY AS APL 01 (LESSON 8) 



PROJECTIONS 



1 2 

12 0, 

12 0 

1 2 
1 2 



A 
A 

A 

nSAY WE HAVE A VECTOR 77/ Z^SPACE ' l 
Z>1 2 3 „ 

*WE WOULD LIKE TO FIND THE PROJECTION. OF L ONTO THE X~Y 
nPLANE I.E. THE PLANE SPANNED BY ' 
M+l 0 0 
N+0 1 0 

nWE COULD PUT THESE TWO VECTORS INTO A MATRIX 
f0+$2 3i>M,N • 



*AHY VECTOR IN THE PLANE SPANNED BY THE COLUMNS OF 0 CAN BE 
^OBTAINED BY (01 ; l]xp[i] )+b[ . 2]xp[2] I.E. 0+.xp FOR SOME 2 
^ELEMENT VECTOR P. THUS WE CAN SPEAK OF THE PLANE, 0. IF 
*L LAY IN THE PLANE 0 % THEN WE COULD FIND P^BY SOLVING 
a£=0+.x?. SIMULTANEOUS EQUATIONS AGAIN I WELL, LET'S TRY 
^SOLVING WITH* B (OR QDb) EVE&.IP L ISN'T IN 0. 
VP+L QD& 0 • * * 

*IF WE 'ADD 1 OF M AND 2 OF N WE GET: 
M+2*N 

nWHICH IS THE DESIRED PROJECTION] BUT/ THIS IS JUST: 
(0[;l3xp[i])+o[;23xp[2] . 

nVHICH IS : 

O+.xP . . 



O+.xL QDb 0 

nWOULD IT MATTER IP THE COLUMN VECTORS OP 0 WERE NOT~CP 
^LENGTH 1? LET'S MAKE 0[;l3=2 0 0. AND PIND. OUT. 
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Defined functions .are introduced in'lesson 1 and an example is included in whkh one 
function calls another. Outer product is dealt with in lesson 2. Direct definition (Tverson 
1) (the alpha/omega notation) is used throughout. 'Del" definition is explained near 
the end of the course. As may be seen, array concepts are introduced early and used 
throughout. In fact, the students are given no mechanism to create a loop until well 
on. 

. • s 
Teaching With APL 

1 

Some texts have been produced in which APL has been used as \b£ language of 
discourse. -Excellent examples are Blaauw 1, Iverson 1, 2, Orth 1 and Spence 1. 
Iverson's texts deal with high school algebra and" elementary anaFySis, Orth's deals with 
calculus and Blaauw's and Spence's with electronics. In the.spring semester of 1980, 
the author was asked to teach a" course in discrete mathematics. This course has 
previously been taught in the conventional manner and covers* the material ^shown in 
the outline below but in a different order. The author decided that this matehud was 
a natural place for the use of APL as notation. As no suitable text was available, the 
author developed a set of notes for the course as a first step to producing such a text. 
A sample of some the material is shown below. 

The usual presentations seem to treat the topics of logic, set theory and relations almost 
as totally separate topics with a different notation Jor each. Eventually, students spof 
the connections between these topics,, but usually not while they are taking the course. 
It is this author's opinion that set theory is most readily introduced via the characteristic 
vector used to indicate the truth or falsity of the proposition "these elements of the 
universe of discourse belong to this set". 

Relations may be introduced by generalising the characteristic vector to a characteristic 
array with a matrix representing a set of sets. Boolean matrices are a natural way to 
deal with cartesian product sets, partitions, and other topics where sets of sets are the 
objects of study. ' * • 

CMPT 205-3 - FALL 1980 
Introduction To Formal Topics in Comjftiting Science 

INSTRUCTOR: E.M. Edwards ' ' * 

• C.C. 7318 
291-3761 s ' 

This course introduces some of the theoretical tools and concepts used in 
computing science. The purpose of the course is to provide the student with 
some facility at recognizing that some problems may be -modelled in formal 
systems, and in using such formal systems to advantage in solving problems 
and designing algorithms. 

APL is*used as notation for developing concepts and proving theorems as well 9 
as for programming examples of the theory. The material has been arranged 
so as to gradually introduce the necessary subset as required. No prior 
knowledge of APL is assumed.. 

The main topics to be covered are: 



1. Logical statements, truth values and truth tables 



2. Logical functions arid identities 
3: Introduction to set theory 

4. Predicate calculus 

5. Relations and graphs 

6. Equivalence relations and partitions 

7. Ordering relations and the basis for sorting 

8. Functions. 

9. Some aspects of number theory 
TEXT: 

"Computing Science 205 Notes", E.M. Edwards 
"Easy As APL oi", E,M. Edwards ■ 



, CMPT 205 - NOTES 10 

* RELATIONS (CONTINUED) 

A 

/ ^PARTITION AND COVERING . 

\ *LET V BE A SET (WITH NO REPEATED ELEMENTS) AND LET S 
*BE A SET OF &ETS REPRESENTED BY A MATRIX, EACH COLUMN 
*0F WHICH IS A CHARACTERISTIC VECTOR FOR A SUBSET OF U. 
^FURTHER, fgET S BE SUCH THAT THE UNION OF ALL THE SETS 
*IN- S IS U. E.G. 
U+\S 

▼S«-$3 5p 11000 00100 10011 

10 1 

10 0 * ' 

0 10- 

0 0 1 ' 
0 0 1 

Still/U 

2 

Si;2l/U 
SL;3l/U 

* 5 * , 

*THE UNION OF THE SETS IN S IS GIVEN BY 

S[;l]vS[;2]vS[;3] 
1 1 1 1 ' 

* WHICH IS 

1111 
A/v/S 

i 

nSUCH A SET OF SETS IS CALLED A COVERING OF U. 
*IF, .IN ADDITION, ALL THE SETS OF S ARE DISJOINT, S IS 
tCALLED A PARTITION OF U. SETS ARE DISJOINT IF THEY 
^CONTAIN NO ELEMENTS IN COMMON. I.E THEIR INTERSECTION 
*IS EMPTY. FROM THE ABOVE IT IS CLEAR THAT IF S *IS A 
^PARTITION OF U, EACH ELEMENT OF U WILL BE IN EXACTLY 
nONE OF 'THE SETS OF S. I.E. 

*IN THIS CASE THIS FAILS. 1 IS IN TWO OF THE SETS. 
+ /S 
1111 



*IF WE MODIFY .S SLIGHTLY, IT BECOMES A PARTITION 
5[l;3]4.o 
▼5 ' 

1 0 0_ 

1 o\o * 




* A/i=+/5 r 
1 ' 

*S IS A PARTITION SINCE */l=+/S; THE ELEMENTS OF A 
nPARTITIQN ARE CALLED BLOCKS. S HAS THREE BLOCKS . • 
nOTHER PARTITIONS OF U ARE/POSS^LE. E.G. 
5 lpl _ ^ - . 




*TRE PARTITION CONSISTING OF ONE BLOCK CONTAINING ALL 
*THE ELEMENTS OF U. 

1 0 0 0 0 * 
0 10 0 0 
0 0 10 0 
0 0 0 1 0 
0 0 0 0 1 

aTHE PARTITION CONSISTING OF ALL SETS WHICH CONTAIN 
^EXACTLY ONE ELEMENT OFrU. 
■ nLET B BE A SUBSET OF U REPRESENTED BY ITS - 
^CHARACTERISTIC VECTOR. THEN B AND ITS COMPLEMENT 
^PARTITION U. 
▼B-K/c 2 4 
0 10 10 
**B 

10 10 1 

*WE MAY CONVENIENTLY GENERATE THIS PARTITION BY 
. *1 0 . 

0 1 

1 0 

0 1 

1 0 

0 1 

*TO' SEE WHT THIS WORKS, CONSIDER THAT B = l LEAVES B 

^UNCHANGED WHILE B=0 IS THE SAME AS ~B. 

A/lr+/P 

1 ' 

*TRUS F IS A PARTITION OF U. 

nLET B AND C BE SUBSETS OF U. 
B+UtZ * 
C+Uc2 k 5 

*THEN THE FOUR SETS 

▼I04.(~B)A~<7 
1 0 0 0 0 

?I14.(-B)AC 
0 1 0 0 i ' 



i'7 



0 0 1 0 0 

1I3+BAC 

0 0 0 1 0 s • 

*FORM A PARTITION OF 2/. 

?7<-*H 5p70,71 t 72,73 
10 0 0 
0 10 0 
0 0 1 o v 

0 0 0 1 - 
0 10 0 

A/l=+/7 v 

1 

" *AS CAN BE SEEN, I IS A PARTITION OF U. THE SET I IS 
*CALLED[THE COMPLETE INTERSECTIONS OR THE MINTERMS 
^GENERATED BT B AND C. NOTE THAT THE POSITIONS OF *RE 
A 1 - 1 SYMBOLS JN THE EXPRESIONS FOR 70, 71 , 12 AND 73 " 
; ^CORRESPOND TO THE O'S JN THE 2 DIGIT BINARY 

^REPRESENTATION OF 0, 1, 2 AND 3. WE MAI EXTEND THIS - 
*TO N SETS AND ELIMINATE EMPTY SETS AS FOLLOWS i 
MINTERMS : ( v/j? ) /R+oa # =BITS "l + pw 
MINTERMS 

BITS i (wp2)T~l+i2**> 

BITS 

*TO SEE THIS, CONSIDER THAT A/ 75 THE INTERSECTION OF A 
nSET OF SETS AND =1 OR =0 GIVES TEE SET ORBITS 
^COMPLEMENT (AS SHOWN PREVIOUSLY) . IF THIS IS APPLIED 
*TO TRJ$ ItlNER PRODUCT DIAGRAM, THE RESULT IS CLEAR. 
nREMEMBER THAT (Np2„>T~l+ \2+N. GIVES THE. BINARY NUMBERS 
nFROM 0 TO ~:f+2*ff AS- ITS COLUMNS. ' -«* * 
U+MQ 

?S«-$3 10p(Uel 2 5 6 9) f (£/e2 3 H 5 9).U€H 5 6 7 
10 0. . 
110 
0 1,0 
Oil 

r-i i ' 

10 1 
0 0 1 
0 0 0 
110 

0 0 0- 

iMS+MINTERMS S 
00001000 
00000010 

00100000 * s 

0, 0010000 

00000001 ' 
00000100 

01000000^ „ -< 

1Q000000 

00000010 y 
0 0 0 0 0 0 0 

*/l=+/MS ja 

*SO MS % IS A PARTITION OF U. 

nEMPTY SETS MAY BE ADDED TO OR REMOVED FROM A PARTITION 
^WITHOUT AFFECTING ITS BEING t A PARTITION SINCE AN EMPTY 
*SET IS DISJOINT FROM EVERY SET AND CONTAINS NO ELEMENTS* 



Below is a sample ofa proof using APL notation. Since the notation >is machine 
executable, an example is run in parallel with the steps of the proof to provide a partial 
check against errors (e.g. a wrong sign). 



^THEOREM'. (EQUIV R) £ ("RiA ;Bl) = A/~flU ; ] a/?[B ; ] 
*IN WORDS: LET R BE AN EQUIVALENCE RELATION. 
hTHEN A AND B ARE. NOT RELATED IFF THE R- RELATIVES 
nOF A AND THE R- RELATIVES OF B ARE -DISJOINT. 
A+2*B+S V 

fiPROOF THAT ( a/~/?U ; ] sRZB ;] ) S ~PU;B] 
(a/~/?U;]a/?[J?;]) <; ~/?r/l;B]A/?[B;B] ^INSTANCE 

RlBi-Bl * ft REFLEXIVE 

(A/~/?[/l;]A/?[B;]) S fl/l=/lAl 

*PROOF THAT ("RlAiD")) £ A/~tfU f] a/?[P ; ] 
P-^A/~/?[yl;]A7?[B;] 

P = ~v//?[/1;.]a/?[B;] *DE MORGAN 

P ,=. ~v/7?[/1;1a/?[;B] ASYMMETRY 

(~P) = v/RZA; ]AP[ ;B] fi(P=f?) = (~P)=~<? 

C~PJ £ PU;B]" ^TRANSITIVE 

(~PU;P]) £ P ' n(PsO) = (~n)«?~P 

fiQED ' ♦ 



Some Extensions to APL 



Some of these (or similar) suggestions have appeared elsewhere. They are included here 
since their absence has been particularly noticed in classroom applications. 

1. Allow the comment symbol to appear anywhere on a line. The processor would 
ignore everything after its First appearance. 

2. Specification into selection expressions. An extremely potent feature of APL is the 
facility with which selection of sub-arrays may be done. Unfortunately, this aspect 
of current implementations is not symmetric with respect to "read" and "write" * 
operations. It would be desirable to replace elements of an array with the same 
facility that allows them to be tested or examined. 



^INSERT TWO 1 'S ON THE DIAGONAL OF A 2*2 MATRIX SITUATED 
' ^*WITH ITS UPPER LEFT CORNER^ AT Af[2;3] VITHOUT CHANGING ANY 
mOTHER VALUES. ; 
v M+t* 6p0 \ 
, * (1 1S2 2 + 1 2+/<0<\ 

M \ 
0 0 0 0 0 0 \/ 
0*0 1 0 0 0 X 
0 0 0 1 0 0 

0 0 0 0 0 0 ^^^^ 

*GIVEN EQtfAL LENGTH VECTORS OF ROW AND COLUMN INDICIES , I 
*AND J, INSERT VALUES X IN POSITIONS OF M GIVEN BY 
«MJCl];.T[l]].MJ[2];«r[2]J./.. 
(1 IWUiJD+X 

* INSERT 1*8 IN A/[l;2], //[2;4], A/[3;6]. ... 
(( l + 2xiltp^)<jA/).[ ; i] t i 



3.' Extension of operators to defined and composite functions, The principle of 
syntactical equivalence (i.e. defined functions and primitive functions are 
syntactically equivalent) currently fails for operators since defined or composite 
* functions may not be indexed nor may they be used as arguments for reduction, 
scan and inner and outer product. The major difficulty to be overcome in 
proposing this extension is the handling of identities for reduction of empty arrays. 



*TUE SYMBOL WILL BE USED IN THE "DEFINITION FOR A 

^FUNCTION INDEX. 
i4KC:( + /E"] w )*(pa>)["] 
?*+3 4pil2 

12 3 4 • ' 

5 6 7 8 
.9 10 11 12 

AVG X 
2.5 6.5 11.5 

AVGt 1 ] X 
5 6 7 8 | 



*IF A RELATION IS REPRESENTED BY A SQUARE BOOLEAN MATRIX. 
nR, THE TRANSITIVE CLOSURE, S, OF R IS GIVEN BYx 
S+v.A/WlOl(3ppR)pR 

nMONTHLY IS A DEFINED SCALAR DYADIC FUNCTION WHICH RETURNS 
*THE MONTHLY PAYMENT REQUIRED TO AMORTISE A Si LOAN OF 
^DURATION « AND MONTHLY. INTEREST FACTOR a. PRODUCE A 
nTABLE OF MONTHLY PAYMENTS FOR A $1200 LOAN AT MONTHLY 
^INTEREST RATES OF 1, 1.5, AND 2 PERCENT WITH DURATIONS OF 
Al, 2, 3, AND 5 YEARS. 

TABLE*. 01*r 100x1200*, 01 .015 .02*. MONTHLY 12*1 2 3 5 

% x 



4. Extended scalar conformability. Scalar dyadic functions should accept arguments 
of equal rank provided that, element by- element, either their dimensions are equal 
or at least one of the pair of values is L ffi the event the ranks of the arguments 
differ by 1, the dimension to be coerced is supplied by indexing the function with 
.the usual default of last dimension. This would permit such operations as: 



nADD 1 5 TO EACH ROW OF A 5x5 MATRIX, X. 
X+X+IQI01\5 

nMANY OF THE USES OF THIS EXTENSION, LIE IN COMBINATIONS 
*0F A REDUCTION AND A SCALAR FUNCTION. E.G. 

*SCALE THE ROWS OF A MATRIX SO THAT EACH LIES IN THE RANGE 
AO TO 1. 

. sx+sx*s+o=s+r /sx+x-i/x 
V 

nFORCE THE MEAN OF EACH COLUMN OF X TO 0 (SEE AVG ABOVE). 
X+X-iniOlAVGLUlOlX 



Conclusion 

Materials have beten presented from two courses in which APL plays a role, either 
as the subject being taught or as notation to aid in the discussion of another subject. 

Many areas of Mathematics and Physics could benefit from the use of APL as a 
teaching notation if well planned and executed teaching materials are made available. 
Maximum benefit is gained when the required APL sophistication is developed 
gradually along with the subject matter. An APL system should be available to students 
for examples and problems. Problem sets shou^mix exercises which require notational 
and computational use of APL. The advantages of APL are completely lost if use is 
not made of array concepts such as outer and inner product, reduction-, etc. Attempts \^ 
to transliterate algorithms from other languages on the grounds that "loops are easier 
to understand" completely miss the point. 



V 
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THE INDUCTIVE METHOD OF INTRODUCING APL« 



Kenneth E. Iverson 
LP. Sharp Associates 
Toronto, Ontsirio 



Because APL is a language, there are, in the teaching of it, many analogies with the 
teaching of natural languages. Because APL is a formal language, there are also many 
differences, yet the analogies prove useful in suggesting appropriate objectives and 
techniques in teaching APL. 

For example, adults learning a language already know a native language, and the 
initial objective is to learn to translate a narrow range of thoughts (concerning 
immediate needs such as the ordering of- food) from the native language in which they 
are eonceived, into the target language being learned. Attention is therefore directed 
to imparting effective use of a small number of words and constructs, and not to the 
memorization of a large vocabulary. Similarly, a student of APL normally knows the 
terminology and procedures of some area of potential application of -computers, and 
the inital objective should be to learn enough to translate these procedures into APL. 
Obvious as this may seem, introductory courses in APL (and in other programming 
languages as well) often lack such a focus, and concentrate instead on exposing the 
studeitt to as much of the vocabulary (i.e., the primitive functions) of APL as possible. 

This paper treats some of the lessons tp be drawn from analogies with the teaching 
of naiyral languages (with emphasis on the inductive method of teaching), examines 
details of their application in the development of a three-day introductory course in 
APL, and reports some results of use of the course. Implications for more advanced 
courses are also discussed briefly. 



1. The Inductive Methdd 

Grammars present general rules, such, as for the conjugation "of verbs, which the student 
learns to apply (by deduction) to particular cases as the need arises. This form of 
presentation contrasts sharply with the way the mother tongue is .learned from repeated 
use of^ particular instances, and from the more or less conscious formulation (by 
induction) of rules which summarize the particular cases. 

The inductive method is now widely used in the teaching of natural languages'. One 
of the better-known methods is that pioneered by Berlitz [1] and now known as the 
"direct" method. A concise and readable presentation, and analysis of the direct method 
may be found in Diller [2]. 

A class in the purely inductive mode is conducted entirely in the target language, with 
no use of the student's mother tongue. Expressions are first learned by imitation, and 
concepts are imparted by such devices as pointing, pictures, and pantomime; students 



answer questions, learn to ask questions, and experiment with their own statements, 
all with constant and immediate reaction from the teacher in the form of correction, 
drill, and praise, expressed, of course, in the target language. 

In the analogous conduct of an APL course, each student (or, preferably, sach student 
pair) is provided with an 'APL terminal, and with a- series of printed sessions which 
give explicit expressions to be "imitated", by entering them on the terminal, which 
suggest ideas for experimentation, and which pose problems for which the student must 
formulate and enter appropriate expressions. Part of such a session is shown as an 
example in Figure 1. • * 

SESSION 1: NAMES AND EXPRESSIONS 

The left side of each page provides examples to be entered on the keyboard, and the 
righf side provides comments on them. Each expression entered must be followed by 
striking the RETURN key to signal the APL system to execute the expression. 

AREA<-8*2 The name AREA is assigned \o the result 

HEIGHT+-2 of the multiplication, that is 16 

VOLUME+HEIGHTxAREA 

HEIGHTxAREA If no name is assigned to the result, it 

48 is printed 

VOLUME 

48 J 
3x8x2 • 

48 

LENGTHS 7 6 5 Names may be assigned to lists 

WIDTH+2 3 4 5 fc 

LENGTHxWIDTH 
16 21 24 25 - 

PERIMETER+-2x(LENGTH+WIDTH) Parentheses specify the, order in wRich 

PERIMETER parts of an expression are to be 

20 20 20 20 , executed' * * 

1.12x1.12x1.12 * ^Decimal numbers may be used 

1.404928 ' « 

1.12*3 • Yield of 12 percent for 3 years 

1.404928 

SAMPLE PORTION OF SESSION 
Figure 1 



Because APL is a formal "imperative" language, the APL system can execute any, 
expression entered on ihe terminal, amd therefore provides most of the reaction required 
from a teacher. The role of Jthe instructor is therefore reduced to that of tutor, providing 
explicit kelp* iri the event of severe / difficulties (such as failure of the terminal), and 
general discussion as required. As compared to the case of" a natural language, the 
' student is expected, artd is better able, to assess his own performance. 

Applied "to natural languages, the inductive methbd offers a number of important 
advantages: * , 

1. Many dull but essential details (such as pronunciation) required at the outset are 



* 



acquired in the course 
in them. 



•X. 

of doinein 



ng\nore interesting things, and without explicit drill 



2. The fun of constantly looking 'for the patterns or rules into which examples can 
be fitted provides a stimulation lacking in the explicit memorization' of rules, and 
* -the repeated examples provide, as always, the best mnemonic basis for 
remembering gerteral rules. 

- 3. The experience of committing error after error, seeing .that they produce no lasting 
harm, and seeing them corrected through conversation, gives the student a 
confidence and a willingness to try that is difficult to impart by more formal 
methods. 

4. The teacher need not be expert in two languages, but only in the target language. 
Analogous advantages are found in the teaching of APL: * 



1. 



Details of the' terminal keyboard are absorbed gradually while doing interesting, 
things from the very outset. 



2. Most of the syntactic rules, and the extension of functions to arrays, can b£ quickly 
( gleaned from examples" such as those presented in Figure 1. - 

3. The student soon sees that <jnost errors are harmless, that the nature of most are 
obvious from the simple errbTm^ssages, anX that any adverse effects (suc^as an 
open quote) are easily rectified fi\ .consulting^ manual t)r a tutor. 

4. /The tutor need only know APL, and does not need to be expert in arcas such 
as financial management or engineering to which students wish to apply APL, 
and need not be experienced in lecturing. 



s 



2. The Use Of Reference Material 



In the pure use of the inductive method, the use of reference material such as grammars 
and dictionaries would be forbidden. Indeed, their use is sometimes discouraged because 
the conscious application of grammatical rules and the conscious pronunciation of words 
* frpm visualization of their spellings promotes uneven delivery. However, if ^tudent 
is to become independent and capable of further x study on his own* he must be 
introduced to appropriate reference material. 

Effective use of reference material requires some practice, and the student should 
therefore be introduced to it early. Moreover he should not be confined to a single 
reference; at the outset, a comprehensive dictionary is too awkward and confusing, but 
a concise dictionary will soon be found to be too limited. 

In the analogous case of A*U the role of both grammar and dictionary is played by 
the reference manual. A concise manual limited *to the core language [3] should be 
supplemented by a more comprehensive manual (such as Berry [4]) which covers all 
aspects of the particular system in use. Moreover, the student should be led immediately 
to locate the two or three rnlin summary tables in the manual, and should^pi^dded 
ipto constant use of the manual. by explicit questions (such as "what is the name of 
the function denoted by the comma"), and by glimpses of interesting functions. 
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3, Order Of Presentation 

Because the student is constantly striving to impose a structure upon the examples 
^presented to him, the orcler of presentation of concepts is crucial, and must be carefully 
\ planned. For example, use of the present jense should be well established before other 

Jtenses and moods are. introduced. The care taken with the order of presentation should, 

however, be unobtrusive, and the student may become aware of it only after gaining 

experience beyond the course, if at all. 

We' will address two particular difficulties with the order of presentation, and exemplify 
their solutions in the context of APL. The first is that certain expressions are too 
complex to be treated properly in detail at the point* where they are first useful. These 
can be handled as "useful expressions" and will be discussed jn t a separate section. 

Th^ second difficulty is that ' certain important notions are rendered complex by the 
/ many guiSes in which they appear. The general approach to such problems is to present 
♦ the essential notion early, and return to it again and again at intervals to reinforce 

it and to add the treatment of further aspects. 

For example, because students often find difficulty %vith the notion of literals (i.e., 
■character^rrays), its treatment in APL is often deferred, 4 even though this deferral also 
makes it necessary to defer important practical notions such as the production of 
reports. In the present approach, the essential notion is introduced early, in the manner 
shown in Figure 2. Literals' are then returned to in several contexts: in the , 
representation of* function definitions, in discussion of literal digits ajid the functions 
(t and i) which are usetTto transform between them and numbers in the production 
of reports; and in thein use with indexing to produce barcharts. 

Function definition is another important idea whose treatment is often deferred because 
of its seeming complexity. However, this complexity inheres not in the notion itself, 
but in the mechanics of the general del form of definition usually employed. This 
complexity includes a new mode of keyboard entry with its own set of error messages, 
a set of rules for function headers, confusion due to side-effects resulting from failure t 
to localize names used or to definitions which print results but have no explicit results, 
and the matter of suspended functions. 
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SESSION 4: LITERALS 

Janet received 5 letters today 

The maximum received by one of them 
* The minimum 

Mary received more than Janet 
They did not receive an equal number 

'What sense can you make of the following sentences: 

JANET has 5 letters and MARY has 8 

JANET has 5 letters and MARY has 4 

'JANET* has 5 letters and 'MARY* has 4. 

The last sentence above uses quotation marks in the usual way to make a literal 
reference to the (letters in the) name itself as opposed to what it denotes. The second 
points up the*potential ambiguity which is resolved by quote marks. 





d HIV LI ***0 




MAHX+-8 




MARY [JANET 


' 8 
5 


ihxQJANET 


1 


MARY> JANET 




MARY-JANET 


0 





7 

3 



LIST<-2k. 
pLIST 



WORD*-* LIST' 
pWORD 




SENTENCE*-' LIST THE NET GAINS' 

INTRODUCTION OF LITERAL^ 
Figure 2 

All of this is avoided by representing each .function definition by a character vector in 
the direct form of definition [5 6]. For example, a student fir'st uses the function 
ROUND provided in a workspace, then shows- its definition, and then defines. an 
equivalent function called R as follows: 

ROUND 24.78 31.15 28.59 
25 31 29 

SHOW 'ROUND' * ~\ 

ROUND:l.$+W * m ^ 

DEFINE •#:[.. 5+f/ 1 

R 24. 78 31.15 ' 



25 31 



'0? 



The function DEFINE compiles the definition provided by Jits argument into an 
appropriate del form, localizes any names which appear to the left of assignment arrows 
in the definition, provides a "trap" or "lock" appropriate to the particular APL system 
so that the function defined behaves like a primitive and cannot be suspended, and 
appends the original argument in a comment line for use by the function SHOW. 

This approach makes it possible to introduce simple function definition very early and 
to use it in a variety of interesting contexts before introducing conditional and recursive 
definitions (also in the direct form), and the more difficult del form. ^ 



4. Teaching Reading 

It is usually much easier to read and comprehend a sentence than it is to write a 
sentence expressing the same thought. Inductive teaching makes much use of such 
reading, and the student is encouraged to scan an entire'passage, using pictures, context, 
and other clues, to grasp the overall theme before invoking the use of a dictionary to 
clarify details. 

Because the entr) of an APL expression on a terminal immediately yields the overall 
result for examination by the student, this approach is particularly effective in teaching 
APL. for example, if the student's workspace has a table of riffnes of countries, and 
a table of oil imports by year by country by month, thqn the sequence.^ 

BW[l]+/[3] OIL 

COUNTRIES, ■ .□ , [l+Bo.>(r/8)x(^)f^] 

produces the following result, which has the obvious interpretation as a barchart of 
oil imports: 

ababia [inmcnirrniinri 

Nigeria cninnDLTDairnjD 

^canada [imininrai] 

fyooNEsi/itninnn : • • 

iran nrDOOCE > 

libya Dammo 

Algeria ammo 

other [imminn^ 

Moreover, because the simple syntax makes "it easy to determine the exact sequence 
in which the parts of the sentence are executed, a detailed understanding of the 
expression can be gained by executing it piece-by-piece, as illustrated in Figure 3. 
Finally, such critical reading, of an expression can lead the student to formulate his 
Own definition of a useful related function as follows: 

DEFINE E 

BARCHART: 1 • M ( ia)*a)xf/w] 
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5. Useful Expressions 
V 

As remarked in Section 3, some expressions are too useful and important to be deferred 
to the point that would be dictated by the complexity of their structure. In APL such 
expressions can be handled by introducing them as defined functions whose use may 
be grasped immediately, but whose internal definition may be left for later study. 

For example, files can be introduced in terms of the functions GET, TO, RANGE, and 
REMOVE, illustrated in Figure 4. These can be grasped and used effectively by the 
student at an earlier stage and with much greater ease than can the underlying 
language elements from which they musr*be constructed in most APL systems. 

A further example is provided by the function needed to compile, display, and edit the 
character vectors used in direct definition of functions. For example, an editing function 
which deletes each position indicated by a slash, and inserts ahead of the position of 
the first comma any text which follows it (in the manner provided for del editing in 
many APL systems) is illustrated in Figure 5. 
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# ♦ The width of the barchart 

Q<~(\N)iN Numbers from 0 to 1 in 25 equal ,steps 

(display if desired) 
f/B The largest value to be charted 

C<~(\'/B)xQ Numbers from 0 to the largest value to be 

1 charted 

S<~B°.>C Comparison of each value of B with 

5 each value in the range to be charted 

1111111111111111111100000 

1111111111111111110000000 

i if n i i i i i i j n i o o o o o o o o 0*0 

^llllllllOOOOOOOOOOOOOOOO*- 
1 1 1 1 H 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0" 0 
1111111100000000000000000 
1111111100000000000000000- 

1111111111111111111111111 

0 

3 21+1+5 Examine a piece of 1+5 

22222222222222 /H^2 2 2 1 
222222222222222 2^22 111 
222222222222222111111 . 

DETAILED EXECUTION OF AN EXPRESSION 

Figure 3 % 
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If the first dimension of an array (list, table, or list of tables) has the value N, (for 
example, 1+pOIL is 7), then it may be distributed to N items of a file by a single 
operation. For example: 

OIL TO 'IMPORTS 72 73 74 75 76 77 78 ' 

*L"se the function GET to retrieve individual items from the IMPORTS file to verify the 
effel% of the preceding expression. 

» 

COUNTRIES TO ' IMPORTS 1 ! Non-numeric data may be entered 
The functions RANGE and REMOVE are useful in managing files: 

RANGE ' IMPORTS' Gives range of indices 

1 72 73 7*+ 75 76 77 78 ! 

REMOVE 'IMPORTS 73 7 5 77 ! Removes odd years 

RANGE 'IMPORTS' 
1 72 74 76 78 



FUNCTIONS FOR USING FILES 



Figure 4 



Deferral of the internal details of the definition of these essential functions c&n, in fact, 
be turned to advantage, because they provide interesting exercises in reading (using the 
techniques of Section 4) the definitions of functions whose purposes are already clear 
from repeated use. For example, critical reading of the following definition of the 
function EDIT is very helpful in grasping the important idea of recursive definition:. 

EDIT: EDIT (A DELETE- Kiu>) , ( UK\A) , (K++/a\A* ' , ' ) +w : 0=Pi4*ffl, OpOw :w 

DELETE:(~(pw)i'/'=a)/u> 

Analysis of the complete set of functions provided for the compilation from direct 
definition form also provides an interesting exercise in reading, but one which would 
not be completed, or perhaps even attempted, until after completion of an introductory 
course. Extensive leads to other interesting reading, of both workspaces and published 
material, should be given the student to encourage further growth after the conclusion 
of formal course work. 



